Anonymní profil Bimbo – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Anonymní profil Bimbo – Programujte.comAnonymní profil Bimbo – Programujte.com

 

Příspěvky odeslané z IP adresy 89.103.124.–

Bimbo
Delphi › Formulář vždy nahoře,jak na…
2. 10. 2008   #86377

To David Čermák :

Mr. Google odpovídá 5. výsledkem na:
http://www.bsdg.org/SWAG/DELPHI/0397.PAS.html

procedure TYourForm.FormCreate(Sender: TObject);
begin
SetWindowPos(YourForm.Handle,
HWND_TOPMOST,
0, 0, 0, 0,
SWP_NOMOVE OR
SWP_NOACTIVATE OR
SWP_NOSIZE);
end;

{However, you need to keep reminding Windows to restore your window to the
top of the z-order ahead of any other topmost windows by adding the
following to the form's OnPaint event. Otherwise, other programs that
modify the z-order can paint over yours.}

procedure TYourForm.FormPaint(Sender: TObject);
begin
SetZOrder(True);
end;


Funguje :) Nizmene pozor na setZOrder - mel jem sitovou aplikaci a nezobrazovalo se ani hlaseni firewallu :)
Snad pomohlo. Bimbo

Bimbo
Delphi › ActiveX popup menu - nahraze…
2. 10. 2008   #86376

Ahoj.
Prosim o radu. Nainportoval jsem si ActiveX prvek, umistil na form a funguje. Umistim druhy a funguje taky. Prvek ma popup menu a to chci prepsat na jine. Prepisu u prvku metodu PopupMenu a vse funuje. To udelam i s druhym. Funguje.


ALE! Pokud kliknu a drzim pravym tlacidlem na prvnim, prejedu na druhy a pustim, vyvol se PUVODI popupmenu a ne moje nastavene. Jinak vse funguje. Jak toto osetrit?

Diky Bimbo

 

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032022 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý