Umieszczanie okna obcego programu w programie wlasnym +TEdit
Napisane: poniedziałek, 6 kwietnia 2009, 22:46
Witam
Chodzi mi o ta porade:
http://cyfbar.republika.pl/teor13.htm#teor2
Wszystko slicznie i pieknie jest tam opisane i wszystko dziala. A co jezeli chcialbym, aby zamiast sapera uzyc innego programu? Np, jezeli zamiast sapera, wrzucic nazwe poprzez komponent TEdit? Nazwa programu nie mialaby wtedy znaczenia.
Konkretnie chodzi o ten kod:
Chodzi mi o ta porade:
http://cyfbar.republika.pl/teor13.htm#teor2
Wszystko slicznie i pieknie jest tam opisane i wszystko dziala. A co jezeli chcialbym, aby zamiast sapera uzyc innego programu? Np, jezeli zamiast sapera, wrzucic nazwe poprzez komponent TEdit? Nazwa programu nie mialaby wtedy znaczenia.
Konkretnie chodzi o ten kod:
- Kod: Zaznacz cały
// Plik nagłówkowy np. Unit1.h
//--------------------------------
private:
HWND saper;
//--------------------------------
- Kod: Zaznacz cały
// Plik źródłowy np. Unit1.cpp
//--------------------------------
void __fastcall TForm1::FormShow(TObject *Sender)
{
saper = FindWindow(0, "Saper");
if(saper > 0)
{
::SetParent(saper, Panel1->Handle);
tagRECT tr;
GetWindowRect(saper, &tr);
int x = tr.right - tr.left;
int y = tr.bottom - tr.top;
int c = (Panel1->Width - 4 - x)/2;
MoveWindow(saper, c, 17, x, y, false);
}
}
//--------------------------------
void __fastcall TForm1::FormCloseQuery(TObject *Sender, bool &CanClose)
{
::SetParent(saper, HWND_DESKTOP); //przywrócenie okna na pulpit
SendMessage(saper, WM_DESTROY, 0, 0); //zamknięcie programu Saper
}
//--------------------------------