PureBoard

Das deutsche PureBasic-Forum
https://www.purebasic.fr/german/

Formularerstellung

https://www.purebasic.fr/german/viewtopic.php?t=28817

Seite 3 von 3

Re: Formularerstellung

Verfasst: 14.05.2015 21:44
von Fanpost
Wie wäre es mit Fehlermeldungen, Sourcecode oder etwas anderem, mit dem man den Fehler analysieren kann. Funktioniert
nicht ist eine sehr schwammige Aussage die niemandem hilft.
Hallo Thomas,

die Fehlermeldung habe ich beschrieben und der Code von mir und Peter ist bekannt. Es könnte ja ein User den Code laden und starten evtl. liegt ja der Fehler woanders.

Gruß Hartmut

Re: Formularerstellung

Verfasst: 14.05.2015 22:12
von ts-soft
Fanpost hat geschrieben:Es könnte ja ein User den Code laden und starten evtl. liegt ja der Fehler woanders.
Ich nicht :mrgreen:

Ansonsten sind die CompilerDirectiven auch noch völlig unbekannt, also:
32- oder 64-Bit
ASCII oder Unicode
Threadsafe
PB-Version
usw.

Falls der Compiler nur wegen EnableExplicit meckert, dann deklariere doch alle Variablen, das sollte auch ein Anfänger
hinbekommen.

Gruß
Thomas

Re: Formularerstellung

Verfasst: 15.05.2015 13:36
von Fanpost
Danke an Alle für die Infos!

Ich bekomme es nicht hin und werde deshalb weiterhin per Browser drucken.


Gruß

Hartmut

Re: Formularerstellung

Verfasst: 15.05.2015 13:44
von Kiffi
wenn Du möchtest, kannst Du mir mal Deinen Code via Mail schicken -> tuebben[at]gmail[dot]com

Grüße ... Peter

Re: Formularerstellung

Verfasst: 16.05.2015 11:54
von Fanpost
Peter hat mir sehr geholfen, d.h. den Code optimiert und drucken funktioniert nun einwandfrei. Vielen Dank Peter! Da bisher über 770 Zugriffe erfolgt sind und daher evtl. großes Interesse besteht, folgt nun der Code:

Code: Alles auswählen

;pb-File
EnableExplicit

IncludeFile "oberflaeche.pbf"

#OLECMDID_PRINT               = 6
#OLECMDEXECOPT_DONTPROMPTUSER = 2
#OLECMDID_PRINTPREVIEW        = 7

OpenWindow_1()

Procedure FormularErstellen()
	
	Protected SNummer$, SNRH$, SWV$, SDIV$, Dat$, Na$
	Protected Te1$, Te2$, Te3$, Te4$, Te5$, Te6$, HWV$
	
	SNummer$ = GetGadgetText(String_kname)
	SNRH$ = GetGadgetText(String_kname_1)
	SWV$ = GetGadgetText(String_kname_2)
	SDIV$ = GetGadgetText(String_kname_3)
	Dat$ = GetGadgetText(String_kname_4)
	Na$ = GetGadgetText(String_kname_5)
	Te1$ = GetGadgetText(String_kname_6)
	Te2$ = GetGadgetText(String_kname_7)
	Te3$ = GetGadgetText(String_kname_8)
	Te4$ = GetGadgetText(String_kname_9)
	Te5$ = GetGadgetText(String_kname_10)
	Te6$ = GetGadgetText(String_kname_11)
	HWV$ = GetGadgetText(String_kname_12)	
	
	Protected HTML.s
	
	HTML + "<!DOCTYPE HTML PUBLIC '-//W3C//DTD HTML 4.01//EN'>"
	HTML + "<html><head><title>Formular-mit-HCGenerator-erzeugt</title>"
	HTML + "</head><body>"
	HTML + "<div style='position:absolute; left:10mm; top:40mm; color:#000000;font-weight:bold;font-family:arial; font-size:22px;'>Prüfprotokoll</div>"
	HTML + "<div style='position:absolute; left:10mm; top:56mm; color:#000000;font-weight:bold;font-family:arial; font-size:19px;'>Komponente:</div>"
	HTML + "<div style='position:absolute; left:60mm; top:55mm; color:#000000;font-weight:bold;font-family:arial; font-size:24px;'>Amaspread</div>"
	HTML + "<div style='position:absolute; left:60mm; top:65.5mm; color:#000000;font-family:arial; font-size:17px;'>Firmeninternes</div>"
	HTML + "<div style='position:absolute; left:60mm; top:72.5mm; color:#000000;font-family:arial; font-size:17px;'>Dokument</div>"
	HTML + "<div style='position:absolute; left:10mm; top:65mm; color:#000000;font-weight:bold;font-family:arial; font-size:19px;'>Vertraulichkeit:</div>"
	HTML + "<div style='position:absolute; left:112mm; top:48mm; color:#000000;font-family:arial; font-size:17px;'>SNR-Hauptplatine:</div>"
	HTML + "<div style='position:absolute; left:12mm; top:140mm; color:#000000;font-family:arial; font-size:17px;'>Sichtprüfung:</div>"
	HTML + "<div style='position:absolute; left:12mm; top:150mm; color:#000000;font-family:arial; font-size:17px;'>Manuelle Funktion:</div>"
	HTML + "<div style='position:absolute; left:12mm; top:160mm; color:#000000;font-family:arial; font-size:17px;'>Funktion der Ein- und Ausgänge:</div>"
	HTML + "<div style='position:absolute; left:12mm; top:180mm; color:#000000;font-weight:bold;font-family:arial; font-size:17px;'>Gesamtergebnis der Prüfung:</div>"
	HTML + "<div style='position:absolute; left:12mm; top:202mm; color:#000000;font-family:arial; font-size:17px;'>"+Te1$+"</div>"
	HTML + "<div style='position:absolute; left:12mm; top:209mm; color:#000000;font-family:arial; font-size:17px;'>"+Te2$+"</div>"
	HTML + "<div style='position:absolute; left:12mm; top:216mm; color:#000000;font-family:arial; font-size:17px;'>"+Te3$+"</div>"
	HTML + "<div style='position:absolute; left:12mm; top:223mm; color:#000000;font-family:arial; font-size:17px;'>"+Te4$+"</div>"
	HTML + "<div style='position:absolute; left:12mm; top:230mm; color:#000000;font-family:arial; font-size:17px;'>"+Te5$+"</div>"
	HTML + "<div style='position:absolute; left:12mm; top:237mm; color:#000000;font-family:arial; font-size:17px;'>"+Te6$+"</div>"
	HTML + "<div style='position:absolute; left:12mm; top:196mm; color:#000000;font-family:arial; font-size:17px;'>Bemerkung:</div>"
	HTML + "<div style='position:absolute; left:112mm; top:56mm; color:#000000;font-family:arial; font-size:17px;'>SW-Version:</div>"
	HTML + "<div style='position:absolute; left:112mm; top:64mm; color:#000000;font-family:arial; font-size:17px;'>SD-Image-Version:</div>"
	HTML + "<div style='position:absolute; left:12mm; top:120mm; color:#000000;font-weight:bold;font-family:arial; font-size:17px;'>Art der Prüfung</div>"
	HTML + "<div style='position:absolute; left:185mm; top:120mm; color:#000000;font-weight:bold;font-family:arial; font-size:17px;'>OK</div>"
	HTML + "<div style='position:absolute; left:182mm;top:117.5mm; height: 70mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:149mm; width: 6.5mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:149mm; height: 6.5mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:155.5mm; width: 6.8mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:191.5mm;top:149mm; height: 6.8mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:179mm; width: 6.5mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:179mm; height: 6.5mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:185.5mm; width: 6.8mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:191.5mm;top:179mm; height: 6.8mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:159mm; width: 6.5mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:159mm; height: 6.5mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:165.5mm; width: 6.8mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:191.5mm;top:159mm; height: 6.8mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:139mm; width: 6.5mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:139mm; height: 6.5mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:185mm;top:145.5mm; width: 6.8mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:191.5mm;top:139mm; height: 6.8mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:167.5mm; width: 184mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:167.5mm; height: 10mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:177.5mm; width: 184.3mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:167.5mm; height: 10.3mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:157.5mm; width: 184mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:157.5mm; height: 10mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:167.5mm; width: 184.3mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:157.5mm; height: 10.3mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:147.5mm; width: 184mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:147.5mm; height: 10mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:157.5mm; width: 184.3mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:147.5mm; height: 10.3mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:127.5mm; width: 184mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:127.5mm; height: 10mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:137.5mm; width: 184.3mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:127.5mm; height: 10.3mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:117.5mm; width: 184mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:117.5mm; height: 10mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:127.5mm; width: 184.3mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:117.5mm; height: 10.3mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:137.5mm; width: 184mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:137.5mm; height: 10mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:147.5mm; width: 184.3mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:137.5mm; height: 10.3mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:186mm; top:140mm; color:#000000;font-weight:bold;font-family:Wingdings; font-size:22px;'>ü</div>"
	HTML + "<div style='position:absolute; left:186mm; top:150mm; color:#000000;font-weight:bold;font-family:Wingdings; font-size:22px;'>ü</div>"
	HTML + "<div style='position:absolute; left:186mm; top:160mm; color:#000000;font-weight:bold;font-family:Wingdings; font-size:22px;'>ü</div>"
	HTML + "<div style='position:absolute; left:186mm; top:180mm; color:#000000;font-weight:bold;font-family:Wingdings; font-size:22px;'>ü</div>"
	HTML + "<div style='position:absolute; left:23mm; top:92mm; color:#000000;font-weight:bold;font-family:arial; font-size:19px;'>Prüfung gemäß Prüfanweisung Amaspread in aktuellster Version</div>"
	HTML + "<div style='position:absolute; left:10mm; top:272mm; color:#000000;font-family:arial; font-size:17px;'>Datum: </div>"
	HTML + "<div style='position:absolute; left:27mm; top:272mm; color:#000000;font-family:arial; font-size:17px;'>"+dat$+"</div>"
	HTML + "<div style='position:absolute; left:65mm; top:272mm; color:#000000;font-family:arial; font-size:17px;'>Prüfer:</div>"
	HTML + "<div style='position:absolute; left:81mm; top:272mm; color:#000000;font-family:arial; font-size:17px;'>"+Na$+"</div>"
	HTML + "<div style='position:absolute; left:124mm;top:273mm; width: 68mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:148mm; top:275mm; color:#000000;font-family:arial; font-size:17px;'>Unterschrift</div>"
	HTML + "<div style='position:absolute; left:112mm; top:40mm; color:#000000;font-family:arial; font-size:17px;'>Seriennummer:</div>"
	HTML + "<div style='position:absolute; left:10mm; top:6.5mm; color:#000000;font-family:Broadway BT; font-size:31px;'>AB-C-DEFG GmbH</div>"
	HTML + "<div style='position:absolute; left:153mm; top:56mm; color:#000000;font-family:arial; font-size:17px;'>"+SWV$+"</div>"
	HTML + "<div style='position:absolute; left:97mm; top:7.5mm; color:#0080FF;font-family:Wingdings; font-size:31px;'>l</div>"
	HTML + "<div style='position:absolute; left:153mm; top:64mm; color:#000000;font-family:arial; font-size:17px;'>"+SDIV$+"</div>"
	HTML + "<div style='position:absolute; left:153mm; top:40mm; color:#000000;font-family:arial; font-size:17px;'>"+SNummer$+"</div>"
	HTML + "<div style='position:absolute; left:10mm;top:194.5mm; width: 184mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:194.5mm; height: 49.5mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:244.0mm; width: 184.3mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:194.5mm; height: 49.8mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:84mm; width: 184mm; box-shadow:0px 0px 0px black; border-top:3px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:84mm; height: 23mm; box-shadow:0px 0px 0px black; border-left:3px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:107.0mm; width: 184.8mm; box-shadow:0px 0px 0px black; border-top:3px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:84mm; height: 23.8mm; box-shadow:0px 0px 0px black; border-left:3px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:177.5mm; width: 184mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:177.5mm; height: 10mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:10mm;top:187.5mm; width: 184.3mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:177.5mm; height: 10.3mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:153mm; top:48mm; color:#000000;font-family:arial; font-size:17px;'>"+SNRH$+"</div>"
	HTML + "<div style='position:absolute; left:160mm; top:8.5mm; color:#000000;font-family:arial; font-size:19px;'>26XXX XXXXXXX</div>"
	HTML + "<div style='position:absolute; left:153mm; top:8.5mm; color:#000000;font-family:arial; font-size:19px;'>-</div>"
	HTML + "<div style='position:absolute; left:109mm; top:17mm; color:#000000;font-family:arial; font-size:16.8px;'>Tel.: 044XX-XXXXXX Mail: QM@xxxxxxxxx.de</div>"
	HTML + "<div style='position:absolute; left:109mm; top:8.5mm; color:#000000;font-family:arial; font-size:19px;'>Am Nordkreuz XX</div>"
	HTML + "<div style='position:absolute; left:153mm; top:72mm; color:#000000;font-family:arial; font-size:17px;'>"+HWV$+"</div>"
	HTML + "<div style='position:absolute; left:106mm;top:37mm; width: 88mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:106mm;top:37mm; height: 43mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:106mm;top:80.0mm; width: 88.3mm; box-shadow:0px 0px 0px black; border-top:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:194mm;top:37mm; height: 43.3mm; box-shadow:0px 0px 0px black; border-left:1px solid #000000'></div>"
	HTML + "<div style='position:absolute; left:112mm; top:72mm; color:#000000;font-family:arial; font-size:17px;'>HW-Version:</div>"
	HTML + "</body></html>" 
	
	SetGadgetItemText(#Adresse, #PB_Web_HtmlCode, HTML)
	
EndProcedure

Procedure FormularDrucken()
	Protected WebObject.IWebBrowser2
	WebObject = GetWindowLong_(GadgetID(#Adresse), #GWL_USERDATA)
	WebObject\ExecWB(#OLECMDID_PRINT, #OLECMDEXECOPT_DONTPROMPTUSER, 0, 0)	
EndProcedure

Repeat
	
	Select WaitWindowEvent()
			
		Case #PB_Event_Gadget
			
			Select EventGadget()
					
				Case Button_machhtml
					FormularErstellen()
					
				Case Button_Drucken
					FormularDrucken()
					
			EndSelect
			
		Case #PB_Event_CloseWindow
			
			Select EventWindow()
					
				Case Window_1
					Break ; Programm beenden
					
			EndSelect
			
	EndSelect
	
ForEver

Code: Alles auswählen

;pbf-File
Global Window_1

Global Button_machhtml, String_kname, String_kname_1, String_kname_2, String_kname_3, String_kname_5, Text_0, Text_0_Copy1, Text_0_Copy2, Text_0_Copy3, Text_0_Copy3_Copy1, Text_0_Copy3_Copy1_Copy1, string_kname_4, Text_1, Text_2, Text_3, String_kname_6, String_kname_7, String_kname_8, String_kname_9, String_kname_10, String_kname_11, Button_Drucken, Button_machhtml_Copy2, String_kname_12, Text_4

Enumeration FormGadget
  #Adresse
EndEnumeration

Enumeration FormFont
  #Font_Window_1_0
EndEnumeration

LoadFont(#Font_Window_1_0,"Arial Narrow", 18)


Procedure OpenWindow_1(x = 0, y = 0, width = 1190, height = 890)
  Window_1 = OpenWindow(#PB_Any, x, y, width, height, "Amaspread Protokoll Erstellung", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget | #PB_Window_SizeGadget | #PB_Window_ScreenCentered)
  Button_machhtml = ButtonGadget(#PB_Any, 840, 580, 100, 25, "Formular erstellen")
  GadgetToolTip(Button_machhtml, "erzeugt eine html-Datei")
  String_kname = StringGadget(#PB_Any, 1010, 65, 105, 25, "150507001HL")
  GadgetToolTip(String_kname, "hier Seriennummer eingeben")
  String_kname_1 = StringGadget(#PB_Any, 1010, 105, 105, 25, "AM2013_000000")
  GadgetToolTip(String_kname_1, "hier die S-Nr. der Hauptplatine eingeben")
  String_kname_2 = StringGadget(#PB_Any, 1010, 145, 105, 25, "PT00.00.0000")
  GadgetToolTip(String_kname_2, "hier die Software-Version eingeben")
  String_kname_3 = StringGadget(#PB_Any, 1010, 185, 105, 25, "000")
  GadgetToolTip(String_kname_3, "hier die SD-Karten-Version eingeben")
  String_kname_5 = StringGadget(#PB_Any, 1010, 305, 105, 25, "Name")
  GadgetToolTip(String_kname_5, "hier den Namen des Pruefers eingeben")
  Text_0 = TextGadget(#PB_Any, 900, 70, 100, 20, "Seriennummer:")
  Text_0_Copy1 = TextGadget(#PB_Any, 900, 110, 100, 20, "SNR-Hauptplatine:")
  Text_0_Copy2 = TextGadget(#PB_Any, 900, 150, 100, 20, "SW-Version:")
  Text_0_Copy3 = TextGadget(#PB_Any, 900, 190, 100, 20, "SD-Image-Version:")
  Text_0_Copy3_Copy1 = TextGadget(#PB_Any, 900, 270, 100, 20, "Datum:")
  Text_0_Copy3_Copy1_Copy1 = TextGadget(#PB_Any, 900, 310, 100, 20, "Prüfer:")
  string_kname_4 = DateGadget(#PB_Any, 1010, 266, 105, 25, "")
  GadgetToolTip(string_kname_4, "hier evt. das Datum Ändern")
  Text_1 = TextGadget(#PB_Any, 840, 360, 80, 20, "Bemerkung:")
  Text_2 = TextGadget(#PB_Any, 840, 10, 340, 50, "Protokolleingaben:")
  SetGadgetFont(Text_2, FontID(#Font_Window_1_0))
  Text_3 = TextGadget(#PB_Any, 10, 10, 300, 30, "Protokoll:")
  SetGadgetFont(Text_3, FontID(#Font_Window_1_0))
  String_kname_6 = StringGadget(#PB_Any, 840, 385, 330, 25, "")
  String_kname_7 = StringGadget(#PB_Any, 840, 415, 330, 25, "")
  String_kname_8 = StringGadget(#PB_Any, 840, 445, 330, 25, "")
  String_kname_9 = StringGadget(#PB_Any, 840, 475, 330, 25, "")
  String_kname_10 = StringGadget(#PB_Any, 840, 505, 330, 25, "")
  String_kname_11 = StringGadget(#PB_Any, 840, 535, 330, 25, "")
  Button_Drucken = ButtonGadget(#PB_Any, 955, 580, 100, 25, "Formular drucken")
  Button_machhtml_Copy2 = ButtonGadget(#PB_Any, 1070, 580, 100, 25, "")
  WebGadget(#Adresse, 10, 45, 810, 835, "about:blank")
  String_kname_12 = StringGadget(#PB_Any, 1010, 225, 105, 25, "HW 1.91 DAT 0215")
  Text_4 = TextGadget(#PB_Any, 900, 230, 100, 20, "HW-Version:")
EndProcedure
Alle Zeiten sind UTC+02:00
Seite 3 von 3

Powered by phpBB® Forum Software © phpBB Limited

Deutsche Übersetzung durch phpBB.de