procedure TForm1. FormCreate ; var uretici: array of DWord; xChar; Begin asm push ebx mov eax, 0 dw $A20F mov DWord ptr uretici, ebx mov DWord ptr uretici , edx mov DWord ptr uretici , ecx pop ebx end; uretici :=0; x:=@uretici; ShowMessage(string ; end; Alıntıdır. arkadaşlar

heheh logic kardes biras önce verdiin bilgiler için saol bu arada delphi için yas basta valla ben gibi herkes atlıo

hayır arkadaşım delphiyi açtığında bir adet project açılıyor zaten osana yeterli daha sonra bu kodları yukarıda anlattığım gibi ekleyerek deneyebilirsin. boş form aç demekle yeni bir project demek istedim sorry düzelttim.

Üzgünüm ya kusura bakma Delphi'deki user form değil mi?

arkadaşım user form değilmi demişsin? hayır değil. yni bir project açmalısın demek istemiştim yazımda hatam vardı düzelttim

ya iyi güzelde ben bişey anlamadım bendemi sorun var acaba..?

Buda ramin durumu ayrı başlık açmayayım dedim procedure TForm1. Timer1Timer ; var m:TMEMORYSTATUS; begin GlobalMemoryStatus ; Label1. caption:=' %' + IntToStr ; Label2. caption:=" + FloatToStr(m. dwTotalPhys /1024.0/1024.0) +' MB'; Label3. caption:="+FloatToStr (m. dwAvailPhys /1024.0/1024.0)+' MB'; end; end. Alıntıdır.

arkadaşım birinci örnek zaten forumun create olayına yazılmış bir komutdur sende boş bir PROJECT aç ve o komutları aynen kopyala ikinci yazımda ise bir adet timer ın içeriğini görüyorsun. formuna bir adet timer ekleyip o kodlarıda çok rahat kullanabilirsin -

lahomenia sadece gülüyorum burası ne bölümü kardeş bak yukarda kocaman ne yazıyo )))) delphi dimi

Logic, "Form aç" derken bu post'ta mı form aç demek istiyorsun?yanlış anlamış olmayayım sonra da ilk yazdıklarını paste mi edeceğiz?