![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
on top [D6, Win95/98]
Алексей Ким © (2002-10-23 18:05:00)Такая ф-ция делает форму онтоп до
следующего activate/de как ее сделать по человечески?
procedure tform1.formshow...
begin
SetWindowPos ( Application.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOACTIVATE or SWP_NOSIZE or SWP_NOMOVE);
end;
Nick N A (2002-10-27 08:26:00) [1]ТApplicationEvents (Aditional)
твоему процессу фокус может передать только другой процесс
т.е. Windows.SetForegroundWindow работает только для других окон
Алексей Ким (2002-10-24 18:12:00) [2]У меня форма не главная а коду в форме кот наплакал,
вызываю форму так
procedure TfmMain.mmsmallClick(Sender: TObject); //mmsmall - tmenuitem
begin
Visible := False; // glavnaya
fmSmall.Show; // eta forma
end;
на выходе
procedure TfmSmall.FormClose(Sender: TObject; var Action: TCloseAction);
begin
fmMain.Show;
end;
в креате читаю ini и делаю memo.lines.assign(fmMain.memo2.lines)
Рыжик>тогда вообще ничего не делает
привести полный юнит?
Рыжик (2002-10-24 10:08:00) [3]А если вместо Application.Handle написать Form1.Handle?
SPeller (2002-10-24 01:01:00) [4]У меня она так по-человечески сразу делалась. Может причина в другом?
Алексей Ким (2002-10-23 21:07:00) [5]up