You should call FrmDrawForm before you draw anything to the screen not
after.
-----Original Message-----
From: Luiz Fernando Barbosa <[EMAIL PROTECTED]>
To: [EMAIL PROTECTED] <[EMAIL PROTECTED]>
Date: Wednesday, December 22, 1999 2:01 PM
Subject: Form question
>Hi,
>
>I have one form that doesn't draw itself.
>Any suggestion ? Following is what I used.
>
>Luiz Fernando
>Thanks in advance,
>
>static Boolean MainFormHandleEvent(EventPtr eventP)
>{
> Boolean handled = false;
> FormPtr frmP;
> UInt cardNo;
> LocalID dbID;
> CharPtr nameP;
> Err Erro;
> UInt i,j;
> ListPtr list;
> char *gLista[60];
>
> switch (eventP->eType)
> {
>
> case frmOpenEvent:
> frmP = FrmGetActiveForm();
>
> j = DmNumDatabases(0) - 1;
> for(i=0;i<= j;i ++ )
>
> dbID = DmGetDatabase(0,i);
> Erro = DmDatabaseInfo (0, dbID,
> nameP, NULL, NULL, NULL, NULL,
> NULL,NULL, NULL,NULL, NULL,NULL);
> gLista[i] = (CharPtr) MemPtrNew(StrLen(nameP)+1);
> StrCopy(gLista[i],nameP);
>
> }
>
> list = FrmGetObjectPtr(frmP,FrmGetObjectIndex(frmP,MainListaList));
> LstSetListChoices(list,gLista,i);
>
> // after the code above the form is not redrawed
>
> FrmDrawForm ( frmP);
> handled = true;
> break;
>
> case frmCloseEvent:
> j = DmNumDatabases(0) - 1;
> for(i=0;i<= j;i ++ )
> MemPtrFree(gLista[i]);
> MemPtrFree(gLista);
>
> handled = true;
> break;
>
> default:
> break;
>
> }
>
> return handled;
>}
>
>
