Einzelnen Beitrag anzeigen

Kralle

Registriert seit: 31. Okt 2004
Ort: Bremerhaven
349 Beiträge
 
Delphi XE7 Professional
 
#1

[XE5] Richtiges Ereignis gesucht

  Alt 31. Jan 2014, 09:20
Moin,

ich trete im Monet auf der Stelle,
Ich habe ein Hauptformular auf dem ein "TPageControl" platziert ist.
Der Inhalt jedes "TTabSheet" kommt aus einer eignen Unit und wird mittel
Delphi-Quellcode:
procedure TMainForm.FormCreate(Sender: TObject);

begin
// Die Einzelnen Units an die TABs binden
 Form_Allgemein:= TForm_Allgemein.Create(Self);
 Form_Allgemein.Parent:=Tab01_Allgemein;
 Form_Allgemein.Show;
 //
 Form_BMK:= TForm_BMK.Create(Self);
 Form_BMK.Parent:=Tab02_Betriebsmittel;
 Form_BMK.Show;
 Form_BMK.rg_Geraetetyp.ItemIndex:=0;
 Form_BMK.rg_BmKAufbau.ItemIndex:=0;
 Form_BMK.lbledt_BmkAufbau.Text:='1,2,3,4';
  //
 Form_TechDaten:= TForm_TechDaten.Create(Self);
 Form_TechDaten.Parent:=Tab03_Tech_Daten;
 Form_TechDaten.Show;
  //
 Form_Material:= TForm_Material.Create(Self);
 Form_Material.Parent:=Tab04_Material;
 Form_Material.Show;
 Form_Material.chklst_Artikeldaten.Enabled:=False;
  //
 Form_Anschluesse:= TForm_Anschluesse.Create(Self);
 Form_Anschluesse.Parent:=Tab05_Anschluesse;
 Form_Anschluesse.Show;
end;
eingebunden.
Wenn eine "TComboBox" auf "Allgemein" verändert wird, sollen auf "Anschlüsse" Objekte entweder auf "Enable = True" bwz "Enable = False" gesetzt werden.

Da ich nicht jede Unit in jeder Unit usen will, soll das de-/aktivieren also in der Unit "Anschlüsse" oder im Hauptformular durchgeführt werden.

Aber, ich finde kein Ereignis, in dem ich das de-/aktivieren platzieren kann und es auch ausgeführt wird?

Es müsste ja ein Ereignis sein, das immer aktiviert wird wenn sich irgenwo was ändert oder in bestimmten sehr kurzen Zeitabschnitten ausgeführt wird.

Ich habe im Moment keinen Plan wie ich das anstellen soll.

Könnt Ihr helfen?

Gruß HEiko
OS: Linux Mint 20 Cinnamon (64-Bit), Windows 10 Professional, Delphi XE7 Pro SP1 +(Mobilpack & FireDAC), Lazarus 2.1 (Freepascal 3.3.1),
  Mit Zitat antworten Zitat