Lidt hjælp :D

Tags:    delphi

<< < 123 > >>
Jeg har et program der tjekker om man har skrevet den rigtige kode og derefter skal man sendes videre.. Hvordan kan jeg komme til en ny form ??

Der skal så være nogle muligheder efter man er kommet til den nye form :)
-----------------------------------
<? echo "Programmering er dejligt, udfordrende og lærerigt!"; ?>



21 svar postet i denne tråd vises herunder
2 indlæg har modtaget i alt 4 karma
Sorter efter stemmer Sorter efter dato
Form1.Close

:)



Form1.Close

:)

Du mangler semikolon: Form1.Close;
Hilsen CHadi
Mit lykketal er 2959



Kan jeg ikke, da det er før en else.



Må vi se lidt mere af din kode?
Hilsen CHadi
Mit lykketal er 2959



procedure TForm1.Button1Click(Sender: TObject);
Var
MyINI: TINIFile; // TINIFile objektet
PathToINIFile: String;
Password_user: String;
Username_user: String;
begin

PathToINIFile := IncludeTrailingBackslash(ExtractFilePath(ParamStr(0)))+'conf.ini';
MyINI := TINIFile.Create(PathToINIFile);

Password_user := MyINI.ReadString('config', 'username', 'Ikke fundet');
Username_user := MyINI.ReadString('config', 'password', 'Ikke fundet');

if (edit_pass.Text = '') or (edit_user.Text = '') then
ShowMessage('Du mangler at udfylde Brugernavn eller Password!')
else

if (edit_pass.Text = Password_user) and (edit_user.Text = Username_user) then
Form2.Show
Form1.Close

else
ShowMessage('Forkert brugernavn/password!');

end;



:)



Username_user) then
Form2.Show
Form1.Close <<<
Du mangler semikolon efter Form2.Show...
altså:
Form2.Show;
Form1.Close
Hilsen CHadi
Mit lykketal er 2959



Så slutter den jo min if inden den er færdig. Har jo en else mere !




if (edit_pass.Text = Password_user) and (edit_user.Text = Username_user) then
Form2.Show
Form1.Close

else
ShowMessage('Forkert brugernavn/password!');

Du skal have Begin og End, når der er mere end 1 linje der skal udføres efter et statement:
Fold kodeboks ind/udKode 

Hilsen CHadi
Mit lykketal er 2959



Virker. Næsten. Den viser ikke form2 selvom jeg har addet den til projektet... :(



Du skal adde unit'en til Form2
Hilsen CHadi
Mit lykketal er 2959



<< < 123 > >>
t