Change bei showmodal?

[okoeller]

Hallo mkinzler,

die change-methode verwende ich, um in einem Treeview den gewählten Knoten festzustellen.
Zuvor wird allerdings eine Combobox(1) ausgewertet, die zu diesem Zeitpunkt noch keinen Eintrag hat.
Vielleicht sollte ich hier besser mit einem Click-Ereignis arbeiten!?

Delphi-Quellcode:

procedure TFrmTexthilfe.tvProdukteChange(Sender: TObject; Node: TTreeNode);
begin
  FAnzeigeStatus := false;
  FrmTexthilfe.SetProduktGewaehlt(FrmTexthilfe.AktuellesProdukt);
end;

Delphi-Quellcode:

function TFrmTexthilfe.AktuellesProdukt: string;
var
  tNode : TTreenode;
begin
  if cbKategorie.ItemIndex > -1 then              <<<< - - (1)
  begin
  tNode:=tvProdukte.Selected ;
    if tNode.Level = 1  then
    begin
        result := tNode.Text;
    end;
  end else begin
    ShowMessage('Bitte wählen Sie zuerste ein Produkt aus.');
  end;
end;

Oliver