İşlemci seri nosunu alan kod?

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Kullanıcı avatarı
delphist
Üye
Mesajlar: 595
Kayıt: 05 Oca 2005 04:34

Mesaj gönderen delphist »

Bende çıkan no bu notebook centrino 1.6 2817128895
Kullanıcı avatarı
karflake
Üye
Mesajlar: 222
Kayıt: 15 Haz 2003 03:57

Mesaj gönderen karflake »

Bilgisayar çift işlemciliyse ne oluyor acaba?
Kullanıcı avatarı
selman
Üye
Mesajlar: 664
Kayıt: 04 Ara 2003 12:06
Konum: İzmir

Mesaj gönderen selman »

:D :D :D
ertemsoft
Üye
Mesajlar: 129
Kayıt: 19 Nis 2005 01:22
İletişim:

Mesaj gönderen ertemsoft »

selam

http://www.ertemsoft.net/icekey.zip bu componentin içinde cpu dışında
HDD Fabrika nosunu veren kodda var unitleri kitap ve internetden topladım (eshardwareid.pas veya hardwareid.pas) dosyasına bakacaksınız örnek demo da var.Umarım işinize yarar

saygılar
Bilgi Paylaştıkça Çoğalır
mhizar
Üye
Mesajlar: 78
Kayıt: 30 May 2005 11:06

Mesaj gönderen mhizar »

olayı bitirmişsin hocam.Allah(c.c.) razı olsun.
mhizar
Üye
Mesajlar: 78
Kayıt: 30 May 2005 11:06

Mesaj gönderen mhizar »

Yanlız hocam merak ettim.Donanımdan pek anlamadığımdan hdddiye sökemem.Burada hddnin fabrika seri nosu HDD manufactor olanmı yoksa HDD seial yazanmı?Ben başka bir kodla hdd nin fabrika seri no olarak sizin kodunuzdaki HDD manufactor olanını buluyordum.Ama içinde harflerde var.Burada hangisini kullanmak daha sağlıklı olur sizce.HDD serial mi HDD manufactor mü?Tekrar çok teşekkürler.
Kullanıcı avatarı
Query
Üye
Mesajlar: 363
Kayıt: 29 Ara 2003 05:13

Mesaj gönderen Query »

Slm;

CPU ID de verdiği 4 değerden (tire ile ayrılanlar) ilk grup ve son grup değişmez seri no fakat onlarda da aynı türden işlemcilerde aynı kodu veriyor.
İkinci ve Üçüncü grupdan hangisi olduğunu hatırlamıyorum HT işlemcilerde her seferinde fakrlı bir kod veriyor.

HDD manufactor değişmez fabrika nodur. Diğeri Her formatta değişen seri nodur.
aseka

Mesaj gönderen aseka »

--
En son aseka tarafından 18 Mar 2008 03:10 tarihinde düzenlendi, toplamda 1 kere düzenlendi.
Kullanıcı avatarı
Fatih!
Kıdemli Üye
Mesajlar: 1172
Kayıt: 26 Kas 2004 10:46
Konum: Malatya
İletişim:

Mesaj gönderen Fatih! »

mitec componentini kullanın.
mitec :ara
stnonstop
Üye
Mesajlar: 149
Kayıt: 22 Haz 2005 04:34

Mesaj gönderen stnonstop »

mhizar yazdı:Selman Hocam fonksiyon bu

Kod: Tümünü seç

Function CPUID :DWORD; assembler; 
asm 
  PUSH    EBX 
  PUSH    EDI 
  MOV     EAX,1 
  DW      $A20F 
  MOV @Result,EDX 
  POP     EDI 
  POP     EBX 
end; 
Kullanımınıda şöyle yapıyorum.

edit1.text:=FloattoStr(CPUID);
Bir incelersen sevinirim.
Acaba Cbuilderda nasıl yazabiliriz böyle bir kodu.
fduman
Moderator
Mesajlar: 2749
Kayıt: 17 Ara 2004 12:02
Konum: Ankara

Mesaj gönderen fduman »

stnonstop yazdı: Acaba Cbuilderda nasıl yazabiliriz böyle bir kodu.
Şöyle olabilir. Tamamen sallıyorum. :D

Kod: Tümünü seç

void DWORD CPUID;
{
asm 
  {
  PUSH    EBX 
  PUSH    EDI 
  MOV     EAX,1 
  DW      $A20F 
  MOV @Result,EDX 
  POP     EDI 
  POP     EBX 
  }
}
Kullanıcı avatarı
lazio
Moderator
Mesajlar: 1527
Kayıt: 11 Tem 2003 04:55
Konum: İstanbul

Mesaj gönderen lazio »

Kod: Tümünü seç

DWORD CPUID(void)
{
  DWORD xReturn;
  asm
  {
        PUSH    EBX
        PUSH    EDI
        MOV     EAX,1
        DW      0xA20F
        MOV xReturn, EDX
        POP     EDI
        POP     EBX
  }
  return xReturn;
}
iki farklı makinada denedim farklı kodlar üretti. sanırım çalışıyor
DeveloperToolKit

..::|YeşilMavi|::..
fduman
Moderator
Mesajlar: 2749
Kayıt: 17 Ara 2004 12:02
Konum: Ankara

Mesaj gönderen fduman »

Sallıyorum demiştim. :D
stnonstop
Üye
Mesajlar: 149
Kayıt: 22 Haz 2005 04:34

Mesaj gönderen stnonstop »

Codelord bende sallamıştım senin gibi ama tutmamıştı :)
stnonstop
Üye
Mesajlar: 149
Kayıt: 22 Haz 2005 04:34

Mesaj gönderen stnonstop »

Bu arada Long(*)() nasıl Str ye dönüştüreceğiz FloatToStr() fonksiyonu olmuyorda...
Cevapla