| |
| |
|
Andre
Hilprecht | ¡Hola zusammen,
tal vez kann me hier alguien en el Sprünge helfen.
1. Beim Starten meines fertigen Exe-Progs erscheint en el Taskleiste > XProfan Runtime 9.0 < Yo möchte erreichen el en el Taskleiste nix adecuado se, oder wenigstens MEIN Programmname con mi Icon. Windowsstyle es 112 y se auch así bleiben.
2. Posesiones en Dialogfenstern con Startpaint / Endpaint Bilder platziert. Selten y unregelmäßig erscheint el Meldung: Verboten, zwischen Startpaint y Endpaint kein Startpaint erlaubt con Zeilennummer. Posesiones aber hundertpro todos Startpaints con Endpaint abgeschlossen y No más Startpaints dazwischen gesetzt. Como ya he dicho, el Fehlermeldung erscheint auch no siempre y no siempre a el gleichen Punto.
3. Yo bekomme simplemente no otro Font en mi Buttons, habe ya alles nachvollzogen Yo hier dazu encontrar podría.
Wäre dankbar para Eure Ayuda, Saludo André |
|
| |
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 27.05.2006 ▲ |
|
| |
|
|
Michael
Wodrich | 1. Título de la ventana y UseIcon
3. Crear(Font,... y SetFont
a 2. brauche Soy un Quellcode-Auszug.
Schöne Grüße
Michael Wodrich |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 27.05.2006 ▲ |
|
| |
|
|
Andre
Hilprecht | Gracias,
1. Klappt ya veces, machmal hilft De hecho, el Klapps en el Hinterkopf.
a 3. Mit UseFont y SetFont tener Yo ya mehrfach intenta, voluntad no ir
a 2.
StartPaint E%
Loadbmp C:InfoVAT.bmp,0,215,-1
EndPaint |
|
| |
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 27.05.2006 ▲ |
|
| |
|
|
Rolf
Koch | Hi
No Usefont y Setfont, pero:
KompilierenMarcaSeparaciónDef GetSysColor(1) !"USER32","GetSysColor"
SETTRUECOLOR 1
DECLARE ENDE%
DECLARE BUTTON1%
DECLARE BUTTON2%
DECLARE EDIT1%
DECLARE EDIT2%
DECLARE RADIOBUTTON1%
DECLARE CHECKBOX1%
Declare font1&,font2&,font3&
font1&=CreateFont("Times New Roman",23,0,0,0,0)
font2&=CreateFont("Verdana",13,0,1,1,0)
font3&=CreateFont("Arial",14,0,0,1,0)
WINDOWSTYLE 63
WINDOWTITLE "Fontzuweisung"
WINDOW 359,112-219,272
CLS GETSYSCOLOR(15)
USEFONT "MS Sans Serif",13,0,0,0,0
SETDIALOGFONT 1
Hier kann ggf. Ihr Menü hin
BUTTON1% = CREATE("BUTTON",%HWND,"BUTTON1",0025,0020,0170,0030)
BUTTON2% = CREATE("BUTTON",%HWND,"BUTTON2",0026,0062,0070,0030)
EDIT1% = CREATE("EDIT",%HWND,"EDIT1",0027,0103,0110,0022)
EDIT2% = CREATE("EDIT",%HWND,"EDIT2",0028,0132,0110,0022)
RADIOBUTTON1% = CREATE("RADIOBUTTON",%HWND,"RADIOBUTTON1",0030,0163,0120,0030)
CHECKBOX1% = CREATE("CHECKBOX",%HWND,"CHECKBOX1",0029,0195,0120,0030)
Setfont Button1%,font1&
Setfont Edit1%,font2&
Setfont Radiobutton1%,font3&
WHILENOT ENDE%
WAITINPUT
If @EQU(%KEY,2)
LET ENDE%= 1
ELSEIF GETFOCUS(BUTTON1%) BUTTON
ELSEIF GETFOCUS(BUTTON2%) BUTTON
ELSEIF GETFOCUS(EDIT1%) EDIT
ELSEIF GETFOCUS(EDIT2%) EDIT
ELSEIF GETFOCUS(RADIOBUTTON1%) RADIOBUTTON
ELSEIF GETFOCUS(CHECKBOX1%) CHECKBOX
ENDIF
WEND
DeleteObject font1&
DeleteObject font2&
DeleteObject font3&
para otro:
Hast Usted irgendwo el Startpaint y Endpaint innerhalb uno Procedimiento?
Oder rufst Usted innerhalb Startpaint y Endpaint una Procedimiento en?
Könnte sí ser, el así algo hay es:
KompilierenMarcaSeparación |
|
| |
| |
| |
|
|
Michael
Wodrich | Style 64 + 16 verstehe Yo sí, aber por qué auch el 32 ?
Yo poner todos! Handles siempre en LongInt una - sicher es sicher.
Könnte con el Transparenz zusammen hängen. Was genau versuchst Usted porque como a hacer - Effekte evtl. encima Memory-Mapa de bits verarbeiten y luego Mostrar.
Nochmal a el Font-Geschichte. Dafür war CreateFont sí zusätzlich eingeführt worden, damits klappt.
Bemühe veces el Suchfunktion hier en el Foro - gestern oder vorgestern war hierzu ya algo rübergetickert.
[box:8748c14704]
Habs wiedergefunden:
[...] 
[/box:8748c14704]
Schöne Grüße
Michael Wodrich |
|
| |
| Programmieren, das spannendste Detektivspiel der Welt. | 27.05.2006 ▲ |
|
| |
|
|
Andre
Hilprecht | Setdialogfont 1 - Das war el gesuchte Befehl y ha mich weitergebracht,
D A N K E ! |
|
| |
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 27.05.2006 ▲ |
|
| |
|
|
Andre
Hilprecht | Zum Startpaint / Endpaint :
Also Yo hatte el así verstanden, wann siempre Yo una De mapa de bits en una
Diálogo bringen voluntad, rahme Yo, el Befehl Loadbmp xyz
con Startpaint y Endpaint una, oder reicht lo al Anfang uno Procedimiento
Startpaint y al Ende entonces Endpaint a conjunto.
Yo rufe así pero no Prozeduren innerhalb Start- Endpaint en,
dazwiswchen es en me siempre sólo el Loadbmp-Befehl.
Saludo André |
|
| |
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 27.05.2006 ▲ |
|
| |
|
|
Andre
Hilprecht | Alle Problemas son Fijo,
1. In el Taskleiste se ahora Meinprogrammname.exe con Meinicon adecuado
2. Yo Dussel hatte en uno Procedimiento Ein Endpaint vergessen, beim nächsten Startpaint en el Programa entonces el Fehlermeldung y por lo tanto siempre a verschiedenen Stellen, siempre hay wo el nächste Startpaint kommt. Dort war aber kein Fehler para encontrar, pero el Fehler rührte de el vergessenen Endpaint vorher.
3. Mein Prog ha ahora después de que Setdialogfont 1 saber una komplett otro Schift.
Gracias a todos, el me en el Sprünge geholfen haben.
Saludo André  |
|
| |
| Ein PC ist die beste Möglichkeit Fehler zu beheben, die ohne PC gar nicht passiert wären. -frei aus Murphy's Computergesetzen
XProfan X2, Win8 Pro 64bit Update von Win7
i5 / 3,2GHz 4 GB RAM
Treibstoff: Radeberger Pils | 27.05.2006 ▲ |
|
| |
|
(817)
Deutsch
English
Français
Español
Italia