Выдвижное меню

[min@y™]

Вот это посмотри.

[Rtootick]

Сообщение от min@y™

Вот это посмотри.

вот же Вы не во время =)
мне бы теперь с логикой разобраться. Поскольку синтаксис я плохо знаю, что не правильного в том кусочке?

[northener]

что не правильного в том кусочке?

Там много чего неправильно.
Напиши так

procedure TForm2.Button1Click(Sender: TObject);
begin
  panel1.Visible:= not panel1.Visible;
end;

[Rtootick]

Сообщение от northener

Там много чего неправильно.
Напиши так

procedure TForm2.Button1Click(Sender: TObject);
begin
  panel1.Visible:= not panel1.Visible;
end;

вот видел подобный пример на просторах интернета, но не использовал)))
спасибо, работает!

[min@y™]

вот же Вы не во время

Ну ахринеть теперь!
И это вместо спасиба...