Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Fussball-Robby,
8. Mai 2008
Na gut, habs geändert. Wenn hier alle gegen goto sind.. Aber von der funktionsweise ändert das doch nichts. Es ist ja auch nicht so, dass ich das in jeder Prozedur benutze, aber ab und zu.. :wink:
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Fussball-Robby,
8. Mai 2008
Natürlich weiß ich das, ich benutze das begin..end in case aber nicht so gerne. Wird mir dann manchmal zu unübersichtlich, ist halt geschmackssache. Wieso sollte man goto dort denn nicht verwenden?
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Fussball-Robby,
8. Mai 2008
Was heißt, es funktioniert keiner mehr? Gibts nen Fehler, oder passiert einfach nichts?
Du könntest es z.B. so machen(OnKeyDown):procedure TMyForm.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
case Key of
vk_Escape: begin
Form2.Visible := False;
Form1.Visible := True;
end;
vk_Add: begin
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by Fussball-Robby,
8. Mai 2008
Sieht so aus, als würde die Exe noch laufen, dann kann Delphi nicht neu kompilieren.
Edit: Man, immer diese schnellen Rüsselmöpse :mrgreen: