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.
---------------------------------------------------------------------
To unsubscribe, e-mail: blitz-list-unsubscribe@netsoc.ucd.ie
For additional commands, e-mail: blitz-list-help@netsoc.ucd.ie