Thankyou,

That worked.

Brian

On 10/15/08 12:01 AM, "svanvoorst@..." <svanvoorst@...> wrote:

> Try adding  Include "Tlbx Dialogs.incl" at the top of your code.
> 
> 
> -----Original Message-----
> From: Brian Heibert <bheibert@...>
> To: FutureBASIC Mailing List <futurebasic@...>
> Sent: Tue, 14 Oct 2008 4:39 pm
> Subject: [FB] Show Alert Box
> 
> Hi,
> 
> 
> 
> I tried this that I found on the List archives on displaying a alert box
> 
> Dialog box
> 
> 
> 
> LOCAL FN ShowAlert( myMessage$, myExplanation$ )
> 
>   DIM AS AlertStdCFStringAlertParamRec params
> 
>   DIM AS OSStatus osErrCode
> 
>   CALL GetStandardAlertDefaultParams( params,_kStdCFStringAlertVersionOne)
> 
> 
> 
>   osErrCode = FN StandardAlert( _kAlertNoteAlert, myMessage$,
> 
> myExplanation$, 0, #0 )
> 
> END FN
> 
> 
> 
> FN ShowAlert ("msg1","msg2")
> 
> 
> 
> But I ran into these errors...
> 
> 
> 
> Error:€€ Unknown variable type in line 6 of speaktext.bas:
> 
> AlertStdCFStringAlertParamRec
> 
> 6:  DIM AS AlertStdCFStringAlertParamRec params
> 
>                                               ^
> 
> 
> 
> 
> 
> Error:€€ Unknown function in line 8 of speaktext.bas:
> 
> GetStandardAlertDefaultParams
> 
> 8:  CALL GetStanda
> rdAlertDefaultParams(params,
> 
> _kStdCFStringAlertVersionOne )
> 
>                                       ^
> 
> 
> 
> 
> 
> 
> 
> Is this code out of date or something? How do I display a alert box?
> 
> 
> 
> Brian
> 
> 
> 
> --
> 
> To unsubscribe, send ANY message to: futurebasic-unsubscribe@...
> 
> 
> 
> --
> To unsubscribe, send ANY message to: futurebasic-unsubscribe@...
> 
>