Jump to content

Forumda bilgisayar programı yazan var mı?


Recommended Posts

16 dakika önce, SHORTWAVE yazdı:

Bir sayacın bir saniyede kaça kadar saydığını bulan programı nasıl yazabiliriz?

Veya  sayaç bir milyona geldiğinde kaç saniye geçtiğini bulan programı nasıl yazabiliriz?

@kavak

 

Doğru anladıysam, bunu uyarlamak için aklıma iki yöntem geliyor.

1. GetTickCount fonksiyonu

2. QueryPerformanceFrequency(freq); QueryPerformanceCounter(startTime); fonksiyonları

 

Birinci șık sadece kaba ölçümler için yeterli ve tavsiye etmem.

 

procedure TForm1.Button2Click(Sender: TObject);
var
  freq: Int64;
  startTime: Int64;
  endTime: Int64;
begin
  QueryPerformanceFrequency(freq);
  QueryPerformanceCounter(startTime); // Bașlangıç
    // 
    // Burada ölçmek istediğiniz eylemleri yazabilirsiniz
    //
  QueryPerformanceCounter(endTime); // Son
  ShowMessage('Ölçülen zaman ' + IntToStr((endTime - startTime) * 1000 div freq) + 'ms');
end;


 

Link to post
Sitelerde Paylaş
Bir saat önce, kavak yazdı:

 

Doğru anladıysam, bunu uyarlamak için aklıma iki yöntem geliyor.

1. GetTickCount fonksiyonu

2. QueryPerformanceFrequency(freq); QueryPerformanceCounter(startTime); fonksiyonları

 

Birinci șık sadece kaba ölçümler için yeterli ve tavsiye etmem.

 


procedure TForm1.Button2Click(Sender: TObject);
var
  freq: Int64;
  startTime: Int64;
  endTime: Int64;
begin
  QueryPerformanceFrequency(freq);
  QueryPerformanceCounter(startTime); // Bașlangıç
    // 
    // Burada ölçmek istediğiniz eylemleri yazabilirsiniz
    //
  QueryPerformanceCounter(endTime); // Son
  ShowMessage('Ölçülen zaman ' + IntToStr((endTime - startTime) * 1000 div freq) + 'ms');
end;



 

@kavak yardımların için teşekkür ederim.:)

Link to post
Sitelerde Paylaş
On 02.01.2018 at 21:27, anibal yazdı:

 

Sıçılmış bir bok beyinli, python ile uğraşıyorsan, böyle şeyler yazmazsın zaten..

 

https://github.com/iheredia/kaleidoscope

 

 

 

Hazır fonksiyonlar birşey öğretmiyor.

 

Çiçek dürbünü ile alakası yok ayrıca.:)

 

tarihinde SHORTWAVE tarafından düzenlendi
Link to post
Sitelerde Paylaş
8 dakika önce, anibal yazdı:

 

O zaman öğren de gel, seni mi avutacağız...

 

Bilseydin  kavak gibi anlatırdın.

 

copy pasteci her  konuda sağdan soldan duyduğun yarım bilgiyle gelip hava atıyorsun.:)

 

Forumun ukalası ve küfürbazısın. 

 

 

 

 

 

 

 

 

Link to post
Sitelerde Paylaş
3 minutes ago, SHORTWAVE said:

Bilseydin  kavak gibi anlatırdın.

 

copy pasteci her  konuda sağdan soldan duyduğun yarım bilgiyle gelip hava atıyorsun.:)

 

Forumun ukalası ve küfürbazısın. 

 

Ne olup olmadığımızı, forumun soytarısından öğrenecek değiliz...

 

Link to post
Sitelerde Paylaş
3 dakika önce, anibal yazdı:

 

Ne olup olmadığımızı, forumun soytarısından öğrenecek değiliz...

 

Forumun soytarısı sensin.Forumda yazdıkların ortada. :)

 

Hakaret küfür etmekten başka bir şey yaptığın yok.

 

 

 

 

 

 

 

 

Link to post
Sitelerde Paylaş
  • Konuyu Görüntüleyenler   0 kullanıcı

    Sayfayı görüntüleyen kayıtlı kullanıcı bulunmuyor.

×
×
  • Yeni Oluştur...