PureBasic Forums - English

Posted: **Mon Jun 25, 2007 2:17 pm**

@Pantcho!! and rsts:

You need to install the beta 2 of PB 4.10, than it should work.

Greetz, Morty

Posted: **Mon Jun 25, 2007 4:14 pm**

Thanks Morty. I will try that shortly. Right now I'm in a development cycle for which I would hate to impact what I've got running.

Thanks again.

cheers

Posted: **Wed Jun 27, 2007 1:38 pm**

Here is a example to show how you can include a html with all files (in the
example a animate gif) in the executable as resource.
So you can enhance the other examples

http://ts-soft.eu/dl/AboutHTML.zip

Posted: **Fri May 09, 2008 7:55 pm**

The links is broken - getting a 404 error

Posted: **Fri May 09, 2008 8:15 pm**

troy wrote:The links is broken - getting a 404 error

sorry, the domain ts-soft.eu exist no more. If i find the old source, i will post
a new link.

Posted: **Thu Jul 10, 2008 2:45 pm**

Hello,

unfortunately the way to transmit data with method="get" does only
transport a small amount of data.

i try unsuccessfully to send a teststring of 10000 Spaces (see code
below). Sending a teststring of 1000 Spaces works.

Code: Select all

; based on the code from Rescator:
EnableExplicit

Procedure.l AboutHtml_NavigationCallback(gadget,url$)
  If Left(url$,8)="cmd:data"
    MessageRequester("GET","Length: " + Str(Len(Right(url$,Len(url$)-8))))
    ProcedureReturn #False
  EndIf
  ProcedureReturn #True
EndProcedure

Define LargeData.s = Space(1000) ; this works 
; Define LargeData.s = Space(10000) ; this not

Define HTML.s = "<html><body><form action='cmd:data' method='get'><textarea name='message' rows='17' cols='77' title='Message'>" + LargeData + "</textarea><input class='button' type='submit' name='submit' Value='submit'></form></body></html>"

OpenWindow(0,#PB_Ignore,#PB_Ignore,800,400,"")
CreateGadgetList(WindowID(0))
WebGadget(0,0,0,WindowWidth(0),WindowHeight(0),"")
SetGadgetItemText(0,#PB_Web_HtmlCode,HTML)
SetGadgetAttribute(0,#PB_Web_NavigationCallback,@AboutHtml_NavigationCallback())
SetActiveGadget(0)
Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow

any hint to solve this problem?

Thanks in advance & Greetings ... Kiffi

Posted: **Sun Jul 27, 2008 3:52 am**

Anyone has noticed that [Tab] key doesn't work?
Try create two text boxes and press [Tab] in one of them =(

PureBasic Forums - English

HTML GUI (PB 4.10+)