InitiateSystemShutdownExA(nil, nil, 0, true, false, $0005000F);
Ah, Vielen DankTraumTaenzerDieter hat geschrieben:Ja, mit {$I %FPCVERSION%}
InitiateSystemShutdownExA(nil, nil, 0, true, false, $0005000F);
Brauchen gar nicht, allerdings finde ich es ganz schön wenn die Compilerversion, der Kompilierungszeitpunkt, etc. im About-Dialog stehen.TT73GP7 hat geschrieben:mal nee dumme Frage
wozu braucht man so etwas eigentlich?
InitiateSystemShutdownExA(nil, nil, 0, true, false, $0005000F);
WriteLn({$I %CURRENTROUTINE%});
WriteLn({$I %DATE%});
WriteLn({$I %FPCTARGET%});
WriteLn({$I %FPCTARGETCPU%});
WriteLn({$I %FPCTARGETOS%});
WriteLn({$I %FPCVERSION%});
WriteLn({$I %FILE%});
WriteLn({$I %LINE%});
WriteLn({$I %LINENUM%});
WriteLn({$I %TIME%});
WriteLn({$I %USER%});
af0815 hat geschrieben:Wäre was für die Wiki
Richtig, deswegen habe ich zumindest den Kompilierungszeitpunkt in der unit der Main Form deklariert. Aber ich glaube ich definiere da zukünftig alles an Compilerinfos.Achtzig hat geschrieben:Soweit ich das in Erinnerung habe, betrifft das aber nur die entsprechende Einheit. Wenn die sich nicht ändert und nicht neu kompiliert werden muß, stimmt der Kompilierungszeitpunkt mit dem Zeitpunkt der Programmerstellung nicht mehr überein.
InitiateSystemShutdownExA(nil, nil, 0, true, false, $0005000F);
caption:={$I %LINE%};
Mitglieder in diesem Forum: 0 Mitglieder und 2 Gäste