Blitz (31/213)

From:David McMinn
Date:5 May 2000 at 10:47:21
Subject:Re: Eof() problems

Hi Krzysztof

> I've tested my last proggy on UAE and there is one stupid problem.
> EOF() is not working on UAE. Always return 0...

Something that annoys me greatly...

> Is any other way to replace this instruction?

Replace it with Loc(x)=Lof(x), i.e.
While NOT(Eof(0)) --> While Not(Loc(0)=Lof(0))

> I need also the shortest way to achieve simple requester WITHOUT
> any Blitz library ;-)

Use intuition.library EasyRequestArgs:

title$="Information"
body$="This is some info."+chr$(10)+"That cool by you?"
gadget$="Yes|No"

DEFTYPE.EasyStruct es
es\es_StructSize = sizeof.EasyStruct
es\es_Flags=0
es\es_Title=&title$
es\es_TextFormat=&body$
es\es_GadgetFormat=&gadget$
gadgetnum.l = EasyRequestArgs_(Peek.l(Addr Window(0)), &es, 0, 0)

The text can be a lot more flexible than this, see the autodocs. You can use it
like printf from C or RawDoFmt from exec.library. The second 0 in the lib call
is the same as the arguments after the format string in printf.

Also, that first 0 in the EasyRequestArgs call can be a pointer to a longword
which holds the IDCMP flags that should cause the requester to quit.



|) /\ \/ ][ |) |\/| c |\/| ][ |\| |\| | dave@satanicdreams.com
http://members.xoom.com/David_McMinn | ICQ=16827694
I used to have a handle on life, but it broke.

---------------------------------------------------------------------
To unsubscribe, e-mail: blitz-list-unsubscribe@netsoc.ucd.ie
For additional commands, e-mail: blitz-list-help@netsoc.ucd.ie