Re: Startmenü zum Starten von Programmen
Verfasst: Fr Jun 03, 2016 1:38 pm
Hallo Herr Döring,
mit dem TabSheet war eine gute Idee
Wechseln mit Button zwischen den TabSheet bekommen ich hin.
Ich verstecke die Tabs und beim Button Click erscheint der gewünschte Tab wieder.
So sieht bei mir der Code aus:
procedure xxxxxClick(Sender: TObject);
begin
PageControl1.ActivePage := PageControl1.FindNextPage(PageControl1.ActivePage,
true,
false);
PageControl1.ActivePage.TabVisible := true;
end;
Folgendes Problem:
Es sollte nur der Tab sichtbar sein zu dem gewechselt wurde.
Jetzt sind immer 2 Tabs vorhanden.
Der erste müsste versteckt werden.
Könnten Sie mich hier unterstützen?
Danke
mit dem TabSheet war eine gute Idee
Wechseln mit Button zwischen den TabSheet bekommen ich hin.
Ich verstecke die Tabs und beim Button Click erscheint der gewünschte Tab wieder.
So sieht bei mir der Code aus:
procedure xxxxxClick(Sender: TObject);
begin
PageControl1.ActivePage := PageControl1.FindNextPage(PageControl1.ActivePage,
true,
false);
PageControl1.ActivePage.TabVisible := true;
end;
Folgendes Problem:
Es sollte nur der Tab sichtbar sein zu dem gewechselt wurde.
Jetzt sind immer 2 Tabs vorhanden.
Der erste müsste versteckt werden.
Könnten Sie mich hier unterstützen?
Danke