Autor: Lech Wiktor Piotrowski (lewhoo_at_teamos2.org.pl)
Data: Mon 24 Dec 2001 - 11:56:09 MET
On Mon, 24 Dec 2001 11:34:27 +0100 (MET), Wojciech Gazda wrote:
>Pokaz kawalek kodu ktory jest w WM_PAINT - mam wrazenie, ze cos nie jest
>dealokowane...
>
na wszelki wypadek pokazuje wiekszy kawalek. To jednak chyba nie jest wieszanie,
tylko wieksze przestoje - budzi sie po jakims czasie. A ze wczoraj mialem duzy swap, to
moze wygladalo jak wieszanie. Wszystko jedno, cos nie tak:
MRESULT EXPENTRY ClientWndProc ( HWND hwndWnd,
ULONG ulMsg,
MPARAM mpParm1,
MPARAM mpParm2 )
{
switch ( ulMsg ) {
case WM_PAINT:
{
POINTL a={0,0}, b={100,100};
char tekst[]="This is a sample multiline text I wonder if I could make it scrollable?
Anyway, I'll try";
GpiMove(hps, &a);
GpiCharString(hps, sizeof(tekst), tekst);
break;
}
case WM_ERASEBACKGROUND:
{
return MRFROMSHORT ( TRUE ) ;
}
case WM_CREATE :
{
hps = WinGetPS(hwndWnd);
POINTL a={0,0}, b={100,100};
GpiMove(hps, &a);
GpiCharString(hps, sizeof("Sample Text"), "Sample Text");
break;
}
case WM_VSCROLL:
{
POINTL a={0,0}, b={100,100};
char tekst[]="This is a sample multiline text I wonder if I could make it scrollable?
Anyway, I'll try";
GpiMove(hps, &a);
GpiCharString(hps, sizeof(tekst), tekst);
break;
}
default:
return WinDefWindowProc ( hwndWnd,
ulMsg,
mpParm1,
mpParm2 ) ;
} /* endswitch */
return MRFROMSHORT ( FALSE ) ;
}
(te na WM_CREATE nie maja sensu, ale to nie powinno miec znaczenia.
---------------------------------------------------------------------------------------------------
Lech Wiktor Piotrowski | ICQ#: 50746253 | lewhoo_at_teamos2.org.pl
TeamOS/2 Poland Webmaster - http://www.teamos2.org.pl
Inne systemy maja uzytkownikow, OS/2 ma wyznawcow
My home OS/2 system uptime is: : 0d 1h 28m 57s 437ms (en).
Emergency mail: lwpiotr_at_tempac.fuw.edu.pl; lewhoo_at_dione.ids.pl
---------------------------------------------------------------------------------------------------
To archiwum zostało wygenerowane przez hypermail 2.1.7 : Tue 18 May 2004 - 15:34:10 MET DST