| |
| |
|
 | Hello Roland
can it his, that since the last XProfan-Version Startpaint not any more functions ?
CompileMarkSeparationDECLARE win01&
PROC FARBEN
STARTPAINT win01&
USEBRUSH 1,RGB(0,0,150)
RECTANGLE 10,10-200,100
DrawText 10,160,Date$(2)
ENDPAINT
ENDPROC
CLS
win01&=CREATE(WINDOW,%HWnd,,20,20,300,200)
FARBEN
WAITINPUT
END
The obenstehende code shows me only the Dialog box and otherwise nothing  |
|
| |
| |
| |
|
|
Rolf
Koch | Hi Horst,
by me functions it How always perfect
CompileMarkSeparationDeclare Win01&
Proc Farben
Startpaint Win01&
Usebrush 1,Rgb(0,0,150)
Rectangle 10,10-200,100
Drawtext 10,160,Date$(2)
Endpaint
Endproc
Cls
Set(AutoPaint, 1)
Win01&=Create(WINDOW,%Hwnd,,20,20,300,200)
Farben
WHILE 1
Waitinput
IF %WMPAINT
FARBEN
ENDIF
WEND
End
|
|
| |
| |
| |
|
|
| @Rolf
even if I your Text take: The Version-Nr 14 operates correct - copy I The EXE-Files the Version 16 into Profanverzeichnis, reacted Startpaint not ! |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | |
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 07/23/06 ▲ |
|
| |
|
|
| |
| |
| |
| |
|
|
Rolf
Koch | Ui what about me having yet The previous Version drin *lol* - lying well on the heissen weather  |
|
| |
| |
| |
|
|
| Roland has The Version 17 abgeschickt ! - now is my Profan-world again aale
thanks |
|
| |
| |
| |
|
(445)
Deutsch
English
Français
Español
Italia