Smooth sliding of form..

[Codius]

I'm trying to make a part of my form slide out when I press a button..

Code: Select all

for i := 0 to 200 do
begin
  frMain.Width := frMain.Width + 2;
end;


The problem is that this really doesn't look good, I've tried to create a couple of threads which would all do that.. but it doesn't work either. Anyone got an idea how to fix this?

[Johnny_Bit]

Double buffered to true, process messages on each iteration. shoud work fine

[Codius]

Well it's certainly an improvement, but still objects such as labels which are aligned to something will flicken like crazy

[Kambiz]

Instead of placing controls on the form, place them on a panel and set panel's DoubleBuffered property to True. Also, after each iteration call TPanel.Update method.

[Codius]

thanks alot, the problem was that I had everything in panels already, but I didn't set the panels to doublebuffered.