Боковая форма

[Gulik]

Подскажите как сделать форму выскакивающую с боку экрана при наведении на неё курсора мыши мыши

[ОДИНОЧЕСТВО В СЕТИ]

ловишь позицию мыши! если она на форме то в таймере меняешь form. Left на меньший пока он не станет меньше на form.width!

[W0LF]

function AnimateWindow(hwnd: HWND, dwTime: DWord, dwFlags: DWord);

Параметры:
hwnd - Дескриптор окна, которое анимируется. Вызывающий поток должен владеть этим окном.
dwTime - Устанавливает, сколько необходимо времени, чтобы воспроизвести мультипликацию, в миллисекундах. Как правило, воспроизведение мультипликации занимает 200 миллисекунд.
dwFlags - Определяет тип мультипликации. Этот параметр может быть одно или несколько нижеследующих значений. Обратите внимание! что, по умолчанию, эти флажки дают желаемый результат при показе окна. Чтобы получать желаемый результат при сокрытии окна, используйте флажок AW_HIDE и логический оператор OR с соответствующими флажками.

AW_SLIDE Использует слайдовую анимацию. По умолчанию используется анимационный ролик (прокрутка мультипликации). Этот флажок игнорируется тогда, когда пользуется с флажком AW_CENTER.
AW_ACTIVATE Активизирует окно (при показе окна). Не используйте это значение совместно с AW_HIDE.
AW_BLEND Использует эффект постепенного изменения прозрачности окна. Этот флажок может быть использован только в том случае, если параметр hwnd - окно верхнего уровня.
AW_HIDE Скрывает окно. По умолчанию, окно показывается на экран.
AW_CENTER Делает вид окна сжатым в точку, если используется флажок AW_HIDE или раскрытым из точки до полного размера, если флажок AW_HIDE не используется. Различные предписывающие флаги не имеют никакого действия.
AW_HOR_POSITIVE Анимирует окно слева направо. Этот флажок может быть использован с роликом или слайдом мультипликации. Он игнорируется, когда используется с флажком AW_CENTER или AW_BLEND.
AW_HOR_NEGATIVE Анимирует окно справа налево. Этот флажок может быть использован с роликом или слайдом мультипликации. Он игнорируется, когда используется с флажком AW_CENTER или AW_BLEND.
AW_VER_POSITIVE Анимирует окно сверху вниз. Этот флажок может быть использованы с роликом или слайдом мультипликации. Он игнорируется, когда используется с флажком AW_CENTER или AW_BLEND.
AW_VER_NEGATIVE Анимирует окно снизу вверх. Этот флажок может быть использован с роликом или слайдом мультипликации. Он игнорируется, когда используется с флажком AW_CENTER или AW_BLEND.

procedure TForm1.FormShow(Sender: TObject);
begin
  AnimateWindow(Handle, 500, AW_CENTER or AW_SLIDE);
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  AnimateWindow(Handle, 500, AW_BLEND or AW_HIDE);
end;

delphiworld.narod.ru

[raxp]

дык, сбоку, это справа или слева?

...условно, по таймеру:

getcursorpos(t); //var t: tpoint
if t.x>screen.width-5 then form.left:= screen.width- width;
//дальше триггер, чтоб не уходило когда курсором юзаете

[Gulik]

Всем спосибо, все зделал. W0LF очень интересный у тебя пример, но не понятен. Если объяснишь как этим пользоваться переделаю.

[russian-stalker]

А что не понятно?
Вот пример:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
if mouse.CursorPos.X<width then
AnimateWindow(Handle, 500, AW_HOR_POSITIVE) else
AnimateWindow(Handle, 500, AW_HOR_NEGATIVE or AW_HIDE);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
borderstyle:=bsnone;
width:=screen.WorkAreaWidth div 10;
height:=screen.WorkAreaHeight;
left:=0;
top:=0;
end;