Borland C++ Builder dla początkujących Obliczanie czasu działania kodu Czasami przydaje się nam policzyć jak szybko wykonuje się dany kod lub po prostu zliczyć czas do innego użytku, znam trzy sposoby na to, różnią się one dokładnością przy podawaniu różnicy czasów: I - dokładność do 1 sekundy Unit1.cpp void __fastcall TForm1::Button1Click(TObject *Sender) {    TDateTime czas, czasStart, czasEnd;    czasStart = Now();    for (long int i = 0; i <= 100000000; i++);    czasEnd = Now();    czas = czasEnd - czasStart;    Label1->Caption = czas; } II - sposób dokładność do 0,001 sekundy: Unit1.cpp void __fastcall TForm1::Button3Click(TObject *Sender) {    float Start = GetTickCount();    for (long int i = 0; i <= 100000000; i++);    float End = GetTickCount();    Label1->Caption = FloatToStr((End - Start) / 1000) + " s."; } III sposób - dokładność do 0,0000000000001 s Unit1.cpp void __fastcall TForm1::Button2Click(TObject *Sender) {    LARGE_INTEGER lpFrequency;    LARGE_INTEGER lpPerformanceCountStart, lpPerformanceCountEnd;    if (QueryPerformanceFrequency(&lpFrequency) != 0)    {       QueryPerformanceCounter(&lpPerformanceCountStart);       for (long int i = 0; i <= 100000000; i++);       QueryPerformanceCounter(&lpPerformanceCountEnd);       double Frequency = lpFrequency.QuadPart;       double End = lpPerformanceCountEnd.QuadPart;       double Start = lpPerformanceCountStart.QuadPart;       Label1->Caption = FloatToStr((End - Start) / Frequency) + " s.";    } }