Unter Delphi 7 hat ein TreeView die Eigenschaft Selected für den ausgewählten Zweig.
Selected wiederum hat die Eigenschaft AbsoluteIndex (ein Integerwert).
Mit TreeView.Items[i].Selected := True kann man einen Eintrag auswählen.
Ungetestet müsste eigentlich sowas in der Art gehen:
Delphi-Quellcode:
procedure TfmMain.FormClose(Sender: TObject; var Action: TCloseAction);
begin
SaveIntegerToConfig('AbsoluteIndex',TreeView.Selected.AbsoluteIndex);
end;
procedure TfmMain.FormCreate(Sender: TObject);
begin
TreeView.Items[ReadIntegerFromConfig('AbsoluteIndex')].Selected := True;
end;