| |
|
|
RudiB. |
¡Hola zusammen,
sabe alguien esta Erfahrung....?? Posesiones bajo XProfan 11.2 bajo Win10 (Auflösung 1366x768) una Programa geschrieben como .exe erstellt y se ejecuta. Nun Yo dieses Programa (.exe) en una Rechner bajo Win7 Enterprise con höherer Auflösung (1980x1080) laufen dejar. Im Programa feste Werte fürs Ventana (1024x768) y feste Werte para el Elemente. Und siehe como, Yo massive Darstellungs-Problemas, Posesiones zwei Screenshots angefügt...findet el Fehler...(hahaha)...nein ernsthaft. z.B en el Check-Boxen...abgeschnittener Texto. ¿Por qué ????.... versteh Yo no ...uno arbeitet doch con Breite en Pixeln para cada Element y así debería el auch entsprechend en una fremden Rechner así dargestellt voluntad..... |
|
|
| Xprofan X4 Rudolf Beske / München
Hardware: NB Intel I9 - 16GByte RAM | 03.02.2020 ▲ |
|
|
|
|
RudiB. | oh....wartet...ahora tener Yo el erste veces correcto gesehen. Es una Problema con el Zeichensatz / Darstellung....aber trotzdem por qué?? |
|
|
| |
|
|
|
Georg Teles | Nabend,
con el Breite el Pixel ha lo wenig zutun, ellos son sí sólo el Dimensionen des Feldes el Checkbox / des RadioButtons / des Buttons a.
Kann no genau sagen, woran lo en dir liegt, como debería uno en deinen Code reinschauen. Yo vermute, dass lo en Umrechnung vom Schriftmodus para Grafikmodus a solch una Ergebnis kommt. Wenn uno no genau el Werte uno Schriftart definiert, se lo en unterschiedlichen Systemen unterschiedlich umgerechnet.
Um el de el Weg a ir, definiere Yo en media Programmen genau, welcher Font y dessen Formato benutzt voluntad se:
Hierbei se cada Element, qué danach producido se, con dieser Schriftart versehen - en cada Windows sieht lo entonces igual de.
Das debería dein Problema lösen. Alternativ hay todavía Crear("Font, si Usted para cierto Elemente sólo cierto Schriftarten uso möchtest - entonces müsstest Usted aber cada Element con SetFont el Schrift zuweisen.
Grüße |
|
|
| |
|
|
|
RGH | Como Georg correcto festgestellt ha: Damit lo überall passt, con SetDialogFont auch esta festzurren. Ansonsten wählt Windows el Standard-Font de, el cada User anders eingestellt haben kann. Wenn como alguien z.B. en Darstellung el Schrift en lugar de 100% etwa 125% oder gar 150% angegeben ha, passt lo natürlich no mehr.
Saludo Roland |
|
|
| XProfan X4Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4 | 04.02.2020 ▲ |
|
|
|
|
RudiB. | Gracias para Eure Respuesta.
Yo así ya gesetzt, sin embargo SetDialogFont 1 sólo una vez al Anfang des Programms. Werde veces cada veces hinter UseFont una SetDialogFont 1 conjunto, veces schauen si el qué bringt. |
|
|
| |
|
|
|
Georg Teles | Lo genügt grundsätzlich sólo 1 Tiempo dies al Anfang des Programms a escribir, todos Fensterobjekte haben entonces esta Schriftart.
Wenn du natürlich mehrere Schriftarten verwendest, entonces macht lo Sinn jeweils antes el Fensterobjekten una otro Schriftart a definieren. |
|
|
| |
|
|
|
RudiB. | Problema gelöst, lo war simplemente sólo el Darstellung (en el fremden Sistema) el Schriftart en el Sistema en 125% eingestellt.
Vielen Dank |
|
|
| |
|
|
|
RudiB. | Hab una kleines Problema wo Yo no mehr más komme. Nach una CLS verschwinden zwei Diálogo-Elemente (Editar-Feld + 1 Button"save") si uno con ratón drüberfährt, entonces erscheinen ellos otra vez. Nach el nächsten CLS son ellos otra vez weg... Aber eben sólo el zwei....Yo versteh el Welt no mehr.... Was se ejecuta como erróneo, welchen Fehler sehe Yo no....
$P+
SET("ERRORLEVEL",0)
$H LIB\Windows.ph
DEF GETSYSCOLOR(1) !"USER32","GetSysColor"
Declarar DE&,Text&,Vokabel$
WINDOWSTYLE 15'512
Título de la ventana " Test"
WINDOW (%maxx/2 - 1024/2),(%maxy/2 - 768/2) - 1024,768
CLS GETSYSCOLOR(15)
SETDIALOGFONT 1
Lerne_mit_Bildern
Waitinput
End
Proc Lerne_mit_Bildern
DE&=@Crear("Dialog",%Hwnd,"Lerne con Bildern",(%maxx/2 - 1024/2),(%maxy/2 - 768/2) , 1024,768)
Declarar hB%, hC%,OK%,Liste_Bilder%,zeile$,datei$,E_dit%
hB% = @Crear("Button",DE&,"Schliessen",710,690,170,25)
E_dit%=Crear("edit",DE&,"",210,690,150,25)
hC%=create("Button",DE&,"suche",370,690,70,25)
Liste_Bilder% = CREATE("SORTEDLISTBOX",DE&,"",0820,0130,0170,0450)
Text&=Crear("Text",DE&,"Themen-Liste", 850,110,130,16)
assign #1,"System\Dateinamen_Bilder.txt"
reset #1
whileloop 25
input #1,zeile$
addstring(Liste_Bilder%,zeile$)
EndWhile
Cerrar #1
'Titelschrift
vokabel$="Lerne con Bildern"
StartPaint DE&
UseFont "Verdana",100,30,1,0,0
Color del texto RGB(131,139,131),-1
DrawText 34,134,Vokabel$
UseFont "Verdana",100,30,1,0,0
Color del texto RGB(255,105,180),-1
DrawText 30,130,Vokabel$
EndPaint DE&
vokabel$="suche una Thema aus"
StartPaint DE&
UseFont "Verdana",100,30,1,0,0
Color del texto RGB(131,139,131),-1
DrawText 34,284,Vokabel$
UseFont "Verdana",100,30,1,0,0
Color del texto RGB(255,105,180),-1
DrawText 30,280,Vokabel$
EndPaint DE&
Text&=Crear("Text",DE&,"Themen-Liste", 850,110,130,16)
Claro OK%
Sinestar encargado Ok%
Waitinput
StartPaint DE&
CLS GETSYSCOLOR(15)
EndPaint DE&
If @Clicked(hB%)'OK wurde angeklickt
Ok% = 1
EndIf
If Getfocus(Liste_Bilder%)
Setfocus(DE&)
Vokabel$=Getstring$((Liste_Bilder%),GetCurSel(Liste_Bilder%))
StartPaint DE&
'Titelschrift
UseFont "Verdana",100,30,1,0,0
Color del texto RGB(131,139,131),-1
DrawText 34,134,Vokabel$
UseFont "Verdana",100,30,1,0,0
Color del texto RGB(255,105,180),-1
DrawText 30,130,Vokabel$
EndPaint DE&
Vokabel$=translate$(vokabel$," ","_")
datei$="Pictures\"+vokabel$+".bmp"
StartPaint DE&
loadbmp datei$,20,250;0
EndPaint DE&
Text&=Crear("Text",DE&,"Themen-Liste", 850,110,130,16)
EndIf
If clicked(hC%)
datei$="Vokabel_Info\"+gettext$(E_dit%)+".txt"
If fileexists(datei$)
imprimir "gefunden"
EndIf
EndIf
EndWhile
@DestroyWindow(DE&)
ENDPROC
|
|
|
| |
|
|
|
p.specht
| Weit su lejos, como durchzublicken - Aus el Ayuda de XP-11.2a: Beim Dibujar en DialogBoxen y DialogFenstern es a beachten, dass esta Zeichnungen no automáticamente erneuert voluntad, si la Dialogbox z.B. por una más Ventana verdeckt wurde. Scheinbar gilt el auch umgekehrt. Workaround: Yo sería versuchen, en el Programmfluss después de el "Fehlerereignis" con ShowWindow(handle%, Modus) el entsprechenden Controls otra vez sichtbar a hacer (So hab´ Yo antes hm-zig Jahren veces beholfen). Oder Yo stehe gerade otra vez veces mächtig al Schlauch - entonces sorry. |
|
|
| XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 29.02.2020 ▲ |
|
|
|
|
RudiB. | Gracias para Su Antwort. Hilft desafortunadamente auch no... qué auch todavía komisch es, el sobald Yo entonces versuche el Focus en uno dieser "verschwundenen" z.B en Edit klicke, Luego se el komplette Dialod-Ventana "gelöscht". Alle Elemente son todavía como y stellen se otra vez con Ratón drüberfahren y klick her. Aber egal...Yo benutze ahora simplemente kein CLS pero lege simplemente una con el Color de fondo gefüllte Mapa de bits drüber (encima el Zona ausserhalb el Diálogo-Elemente). No gerade genial, pero wirkt, el Elemente bleiben nun. |
|
|
| |
|
|
|
p.specht
| Bravo! Manchmal führt el kürzeste Weg para Erfolg eben por el Gruselkabinett |
|
|
| XProfan 11Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'... | 29.02.2020 ▲ |
|
|
|