Forum: Object-Pascal / Delphi-Language
Delphi
by sniper_w,
15. Jul 2005
Auf ein Ergebniss einer Funktion zu warten ist immer langsamer als auf eine einzige Variable zuzugreifen.
Forum: Object-Pascal / Delphi-Language
Delphi
by sniper_w,
13. Jul 2005
Dann musst du halt aufpassen ;). Anstatt 'restore_me', nimm 'TForm1_Button1Click_Sender_TObject_'
Forum: Object-Pascal / Delphi-Language
Delphi
by sniper_w,
13. Jul 2005
Darüber lässt sich diskutieren. Aber das wollte ich ja nicht. Ich wollte lediglich diese Möglichkeit zeigen. Ob das richtig ist, schön oder nicht, ist eine andere Sache.
Forum: Object-Pascal / Delphi-Language
Delphi
by sniper_w,
13. Jul 2005
Ich habe damasl diese Frage auf meine Festplatte geschpeichert, wollte es später auch beantworten. Da ich erst jetzt diese Frage wieder gefunden habe, hier ein Antwort: Ja.
Und zwar so(Delphi 6):
procedure TForm1.Button1Click(Sender: TObject);
{$IFOPT J-}
{$DEFINE restore_me}
{$ENDIF}
{$IF DEFINED (restore_me)}
{$J+}
{$IFEND}
const D:Integer = 0;