Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by DeddyH,
2. Nov 2010
Diese beiden Methoden habe ich mal testhalber den 3 Controls zugewiesen:
procedure TFormTest.ListBox1Enter(Sender: TObject);
begin
ListBox1.Visible := true;
end;
procedure TFormTest.ListBox1Exit(Sender: TObject);
begin
ListBox1.Visible := (ActiveControl = Edit1) or (ActiveControl = Edit2) or (ActiveControl = ListBox1);
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
by DeddyH,
29. Okt 2010
Dann eben anders:
ListBox1.Visible := (ActiveControl = Edit1) or (ActiveControl = Edit2) or (ActiveControl = ListBox1);
Das müsste dann ins OnExit dieser 3 Controls, dann sollte es klappen, sofern ich keinen dummen Denkfehler mache.