| |
| |
|
Stefan81 | ¡Hola,Yo habe me gerade sólo Xprofan 4 gekauft,Yo bin Principiante.
Yo möchte gerne una Ventana redactar,Yo habe lo con Dem Diálogo Editor zusammengebaut, Wenn Yo Den Diálogo starte erscheint mein Diálogo y una Weißes Interpreter Ventana, Yo möchte aber sólo el Diálogo Mostrar sin zweites Weißes Ventana. Was mach Yo, el falso,
Hier es el code.
proc dialog
declarar hFont&
declarar _ende%
declarar _dlg%
declarar gridrechn&
declarar cmdende&
hFont& = create("Font", "ARIAL",14,0,0,0,0)
setdialogfont hFont&
_dlg% = create("dialog", %hWnd, "Dialog", 180, 100, 370, 277 + %cyCaption)
gridrechn& = create("gridbox", _dlg%, "Rechnung", 1, 16, 32, 320, 224)
create("icon", _dlg%, "MUENZE", 24, 0)
cmdende& = create("picbutton", _dlg%, 0, 232, 8, 104, 24)
_ende% = 0
whilenot _ende%
waitinput
if (%key = 2)
_ende% = 1
elseif clicked(gridrechn&)
' Aktion todavía no definiert!
elseif clicked(cmdende&)
' Aktion todavía no definiert!
endif
endWhile
destroywindow(_dlg%)
setdialogfont 0
deleteobject hfont&
ENDPROC
windowtitle "Dialog-Test"
cls
dialog
waitinput
end
|
|
| |
| |
| |
|
|
Georg
Teles | Bueno Abend,
nunja, el CLS producido sí dein Ventana principal = %hWnd qué du media
entferne Título de la ventana y CLS primero...
Nun müsstest Usted dein Diálogo no en %hWnd qué Usted nun no hast pero en % Desktop erzeugen, entonces dürfte alles passen
Grüße |
|
| |
| |
| |
|
|
Stefan81 | Besten Dank para rápido Ayuda
Lo Sombrero funktioniert.
Super |
|
| |
| |
| |
|
|
H.Brill | Tal vez todavía una Referencia :
gridrechn& = create("gridbox", _dlg%, "Rechnung", 1, 16, 32, 320, 224)
Als zweiten Parámetro gibst du el String "Rechnung" con.
Dieser Parámetro debería aber el Spaltendefinitionen beinhalten.
Also
"Spaltenname;Ausrichtung;Breite"
Wenn du mehrere Spalten hast, entonces auch jeweils
Spaltenname;Ausrichtung;Breite .
Alles zusammen en un String. |
|
| |
| Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.
Was die Borg können, können wir schon lange. | 05.01.2020 ▲ |
|
| |
|
|
Stefan81 | | Gracias para Den Referencia |
|
| |
| |
| |
|
(870)
Deutsch
English
Français
Español
Italia