Ik heb een klein e-mail programmatje gemaakt in delhi met behulp van een stuk gedownloade code.
Het programmatje werkt verder perfect alleen nu wil ik een ander formulier laten zien wanneer het programma start.
Nu start MainForm op als eerste maar dat moet worden AboutFrm.
Ik heb dit gedaan door de simpele code:
Alleen dan crashed het programma. Haal ik de regel Aboutfrm.visible := true; weg dan draait het programma wel maar is MainForm gewoon visible.
Hieronder de code die achter FormCreate staat:
Wie weet waar dit aan ligt? of heeft een betere oplossing? (Ik ben redelijke newbie @ delphi)
Het programmatje werkt verder perfect alleen nu wil ik een ander formulier laten zien wanneer het programma start.
Nu start MainForm op als eerste maar dat moet worden AboutFrm.
Ik heb dit gedaan door de simpele code:
code:
1
2
| MainForm.visible := false; AboutFrm.visible := true; |
Alleen dan crashed het programma. Haal ik de regel Aboutfrm.visible := true; weg dan draait het programma wel maar is MainForm gewoon visible.
Hieronder de code die achter FormCreate staat:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
| (* Icon := Application.Icon; *)
Application.Title := 'TEmail demonstration';
Messages := TStringlist.Create;
Messages.Sorted := false;
nUnread := -1;
MsgIndex := 0;
Abort := False;
{$IFDEF TESTCOMPON}
Email1 := TEmail.Create(Self);
{$ENDIF TESTCOMPON}
if Email1.Logon <> EMAIL_OK then
MessageDlg('MAPI Logon failed', mtError, [mbOk], 0);
Caption := Caption + ' [demo of TEmail ' + Email1.Version + ']';
MainForm.visible := false;
AboutFrm.visible := true; |
Wie weet waar dit aan ligt? of heeft een betere oplossing? (Ik ben redelijke newbie @ delphi)