Hallo.
Ein unabhängiges Form wird von 2 Projekten in einer Projektgruppe verwendet.
Dabei soll in allen Anwendungen immer nur 1 Form gleichzeitig geöffnet sein.
Dabei würde ich mir wünschen, dass man alle Forms von TApplication dynamisch aufrufen kann. Nur: Wie geht das?
Folgender Code würde mir vorschweben:
Delphi-Quellcode:
procedure HideAllForms;
begin
for i := ... do
begin
Application.Form[i].Hide; // Form[i] gibt's nicht :-/
end;
end;
procedure TGemeinsamesForm.ShowOnlyThisFrom;
begin
HideAllForms;
Self.Show;
end;
Gruß
blackdrake