Italian community of Lazarus and Free Pascal
Programmazione => LCL => Topic aperto da: lesar - Novembre 06, 2013, 11:58:41 am
-
Salve dopo aver aggiunto a runtime dei pulsanti TToolButton a una TToolBar volevo anche rimuoverli ma incontro dei problemi.
Qualcuno ha la giusta porcedura sotto mano?
Lazarus 1.1.99pre-release
fpc 2.6.2
x86-64-linux-gtk 2
-
procedure TWindowListFrame.CloseButton();
begin
WindowList.ButtonList.Remove(FCurrentButton);
WindowList.RemoveControl(FCurrentButton);
FCurrentButton:=nil;
end;
dove WindowList: TToolBar;
FCurrentButton: TToolButton; creato dinamicamente e propieta di WindowList: TToolBar
In questo modo funziona e non č neppure necessario usare messaggi ma puņ essere eseguito direttamente in una azione collegata al bottone.
Saluti
-
Grazie lesar per il tuo contributo :)