29. september 2002 - 20:31Der er
7 kommentarer og 1 løsning
en kommando som gør ingen ting
Jeg har lavet et program hvor at hvis der i ini filen er et bestemt nummer så skal den bare køre programmet normalt, og hvis det nummer ikke står der så skal den åbne form3. Jeg har det til at stå sådan:
procedure TMainform.FormShow(Sender: TObject); begin If iniread('indstillinger.ini','reg','kode','xxx')='xxx' then begin MEN HVAD SKAL DER STÅ HER FOR AT DEN BARE KØRE PROGRAMMET NORMALT?? end else Form3.ShowModal; end;
begin Application.Initialize; If iniread('indstillinger.ini','reg','kode','xxx')='xxx' then Application.CreateForm(TForm1, Form1) else Application.CreateForm(TForm3, Form3) Application.Run; end.
procedure TMainform.FormShow(Sender: TObject); begin If iniread('indstillinger.ini','reg','kode','xxx')='xxx' then begin exit; end else Form3.ShowModal; end;
DL>> Det er en kode som din jeg skal bruge men jeg kan ikke få den til at virke... Der sker bare ingen ting når man starter programmet. det starter bare normalt.
Kan du ikke sende programmet, så kan jeg lige se på det. PS. Du skal lige huske på at BOGSTAVER og TAL ikke er det samme. Det eks. du skrev til gruppen er på bogstaver.
Er det et TAL der står i den INI-fil. og/eller for du en fejl, og i så fald, hvad hedder den fejl ?
Ps. det ville være bedre at sende det til mig, kan jeg mener lave det. Jeg ville ikke kopier det, hvis det er det du er bange for. ( Jeg ved at der er nogen som er det )
//dl
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
