Forum: Object-Pascal / Delphi-Language
Delphi
by Sven M.,
8. Jul 2015
Das funktioniert hervorragend. Aber warum? :D
Forum: Object-Pascal / Delphi-Language
Delphi
by Sven M.,
8. Jul 2015
Hat es nicht. ;)
Die Deklaration der Form sieht so aus:
type
TfrmLogin = class(TForm)
Image1: TImage;
lblLogin: TLabel;
procedure FormCreate(Sender: TObject);
procedure FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
Forum: Object-Pascal / Delphi-Language
Delphi
by Sven M.,
8. Jul 2015
Hi zusammen,
ich habe eine Klasse, die die Kommunikation und Ansteuerung einiger Displays kapselt. Das ganze läuft via RS485 und TApdComPort. Nun will ich, je nach Zustand, die Displays etwas anzeigen lassen.
if Key=VK_F10 then
begin
case Display.Status of
Virgin: Display.DoEightTest;
Initialized: Display.DoEightTest;
Eights: Display.ShowHardwareAdresses;
...