Hi,
ich habe hier ein kleines Problem.
In einer Unit1 ist ein Polling Timer.
In einer Unit2 ist eine Form1 mit Label1. Dies dient nur als Options Fenster und wird eigentlich im normalen gebrauch nie angezeigt.
Wenn nun die Form1 sichtbar sein sollte, soll der Polling Timer in der Unit1 den Label in der Unit2 Updaten.
Unit2:
Delphi-Quellcode:
unit Options
type
TFormOptions =
class(TForm)
lbMeinCode: TLabel;
procedure FormCreate(Sender: TObject);
procedure FormDestroy(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
Type
FormOptions= TFormOptions;
In der Unit1 will ich's nun so machen:
Delphi-Quellcode:
uses Options,...
var
OptionsFormCode : FormOptions;
..
..
OptionsFormCode.lbMeinCode.Caption := 'Mein Code';
Da gibt es aber dann immer Probleme und Delphi steigt aus.
Kann mir da jemand einen Tipp geben!?
Auch hätte ich die Frage wie ich am schnellsten/einfachsten Überpüfe ob die Form1 geladen ist oder nicht? Derzeit hätte ich das mit einer globalen Variable gemacht...
Danke!