HTML Code in Pure basic ausgeben

Beitrag von **Kiffi** » 23.10.2006 20:56

> naja das ist eh keine richtige webseite sondern eher nurn paar texte und
> ne textbox plus link

dann verstehe ich nicht, was das mit HTML zu tun haben soll.

> Kommt in die Sig

Wann?

Grüße ... Kiffi

Bogy · Beitrag von **Bogy** » 23.10.2006 20:57

Kiffi hat geschrieben:> naja das ist eh keine richtige webseite sondern eher nurn paar texte und
> ne textbox plus link

dann verstehe ich nicht, was das mit HTML zu tun haben soll.

> Kommt in die Sig

Wann?

Grüße ... Kiffi

signatur wurde am anfang nicht angehängt sry

Wenn du mir ne alternative gibt die net kompli ist würd ichs auch gern machen

Kaeru Gaman · Beitrag von **Kaeru Gaman** » 23.10.2006 21:02

unter "info-datei" kann ich mir nich so richtig was vorstellen...

normalerweise solltest du bei ner ausgabe in nem fenster auch nen Close-Button haben,
und auf den solltest du reagieren.

Code: Alles auswählen

OpenWindow(0,0,0,200,100,"INFO")
Repeat
  EVID = WaitWindowEvent()
Until EVID = #PB_Event_CloseWindow

reagiert auf Button und auf ALT-F4

Code: Alles auswählen

OpenWindow(0,0,0,200,100,"INFO",#PB_Window_BorderLess)
StartDrawing(WindowOutput(0))
  DrawText(10,10,"INFO")
StopDrawing()
Repeat
  EVID = WaitWindowEvent()
Until EVID = #PB_Event_CloseWindow

hat keinen X-Button, reagiert nur auf ALT-F4, und auch nur, wenn es den fokus hat.

PS:
auch ALT-F4 ist ein #PB_Event_CloseWindow
ohne event-schleife kein window.

Beitrag von **Kiffi** » 23.10.2006 21:02

Danke für die Signatur!

> Wenn du mir ne alternative gibt die net kompli ist würd ichs auch gern
> machen

wie können wir Dir eine Alternative empfehlen, wenn wir nicht wissen, was
Du überhaupt machen willst? (siehe auch das Posting von Kaeru Gaman)

Soll das Programm in einem Fenster laufen? In einer Konsole? Oder wie?

Grüße ... Kiffi

KeyPusher · Beitrag von **KeyPusher** » 23.10.2006 21:03

hier zwei kleine "programme" die man mit Alt-F4 beenden kann.

für console:

Code: Alles auswählen

OpenConsole()
Repeat
    Delay(10)
    Inkey()
Until RawKey()=115
CloseConsole()
End

für fenster:

Code: Alles auswählen

If OpenWindow(0, 100, 200, 195, 260, "PureBasic Window", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget)
    AddKeyboardShortcut(0,#PB_Shortcut_F4|#PB_Shortcut_Alt, 1)
    Repeat
        EventID = WaitWindowEvent()
        If EventID = #PB_Event_CloseWindow 
            Quit = 1
        EndIf
        If EventMenu()=1
            Quit=1
        EndIf
    Until Quit = 1
EndIf
CloseWindow(0)
End

steht aber alles irgendwie in der hilfe. da hab ich's auch her - wenn auch nicht am stück

Bogy · Beitrag von **Bogy** » 23.10.2006 21:04

Standart fenster

Ist ja kein "programm" sagt nur nen Paar zeilen die man auch makieren kann oder ne Textbox das wars mit evt einen Link

Kaeru Gaman · Beitrag von **Kaeru Gaman** » 23.10.2006 21:05

boah wird hier hardcore schnell gepostet...

PS: bitte auch meinen code 4(!) postings weiter oben beachten...

Bogy · Beitrag von **Bogy** » 23.10.2006 21:08

hab mal

Code: Alles auswählen

If OpenWindow(0, 100, 200, 195, 260, "PureBasic Window", #PB_Window_SystemMenu | #PB_Window_MinimizeGadget | #PB_Window_MaximizeGadget)
    AddKeyboardShortcut(0,#PB_Shortcut_F4|#PB_Shortcut_Alt, 1)  
text$+"<html>"+Chr(13)+Chr(10)
text$+"<head>"+Chr(13)+Chr(10)
text$+"</head>"+Chr(13)+Chr(10)
text$+"<body>"+Chr(13)+Chr(10)
text$+""+Chr(13)+Chr(10)
text$+"<h1>test</h1>"+Chr(13)+Chr(10)
text$+"<br>"+Chr(13)+Chr(10)
text$+"bla"+Chr(13)+Chr(10)
text$+"</body>"+Chr(13)+Chr(10)
text$+"</html>"+Chr(13)+Chr(10)

    Repeat
        EventID = WaitWindowEvent()
        If EventID = #PB_Event_CloseWindow
            Quit = 1
        EndIf
        If EventMenu()=1
            Quit=1
        EndIf
    Until Quit = 1
EndIf
CloseWindow(0)
End

probiert wurde aber kein text angezeigt

Kaeru Gaman · Beitrag von **Kaeru Gaman** » 23.10.2006 21:11

bitte mal die codes vorher auch lesen.

auf den shortcut kannst du verzichten.
wie ich sagte, auch ALT-F4 ist ein normales Close.

dein text wird nicht angezeigt, weil du nichts anzeigst.

du müsstest zumindest ein textgadget erstellen, dem du den text$ übergibst.

Bogy · Beitrag von **Bogy** » 23.10.2006 21:12

Kaeru Gaman hat geschrieben:bitte mal die codes vorher auch lesen.

auf den shortcut kannst du verzichten.
wie ich sagte, auch ALT-F4 ist ein normales Close.

dein text wird nicht angezeigt, weil du nichts anzeigst.

du müsstest zumindest ein textgadget erstellen, dem du den text$ übergibst.

was bedeutet das auf n00bisch?

Code example