Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
19. Jul 2012
Ja, ich hab mir z.B. ein generisches IfThen gebastelt (z.B. für Enums und Klassen) und weißt du wie blöd das TGenerics.IfThen<TIrgendwas>(...) aussieht?
Ich hätte es da lieber als überladene Prozedur zu den anderen existierenden IfThen's gehabt. :cry:
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
18. Jul 2012
procedure TForm1.Button1Click(Sender: TObject);
var
Button: TButton absolute Sender;
begin
if Sender is TButton then
Button.Caption := 'ich bin ein Button';
end;
Bei solchen Funktionen kenn ich es oft, daß sie den Ausgabewert nur setzen, wenn die Prüfung erfolgreich war.