Forum: Sonstige Fragen zu Delphi
Delphi
by Nero281084,
12. Nov 2009
hab alles hingekriegt.
danke für die hilfe, so schaut der quelltext jetzt aus:
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, Grids;
type
Forum: Sonstige Fragen zu Delphi
Delphi
by Nero281084,
12. Nov 2009
FileList:= TStringList.Create;
FileList.LoadFromFile('D:\Delphi\De2\Formular2.11\Login.txt');
for j := 0 to TStringList.Count - 1 do begin
if form1.Edit2.Text = FileList then begin
if form1.Edit1.Text = FileList then
ShowMessage('Erfolgreich eingelogt');
end else
ShowMessage('Leider falsch. Versuch es bitte nochmal.');
zaehler:=...
Forum: Sonstige Fragen zu Delphi
Delphi
by Nero281084,
12. Nov 2009
Jetzt sagt mir das programm aber dass er auf die eigenschaft 'count' nicht zugreifen kann
Forum: Sonstige Fragen zu Delphi
Delphi
by Nero281084,
12. Nov 2009
macht sinn.
probier ich gleich mal aus
Forum: Sonstige Fragen zu Delphi
Delphi
by Nero281084,
12. Nov 2009
das programm sagt: EStringError mit der Meldung 'Listenindex überschreitet das Maximum'
und ich nicht auf die txt datei zugreifen und die daten mit den edit.felder vergleichen
Forum: Sonstige Fragen zu Delphi
Delphi
by Nero281084,
12. Nov 2009
Hallo leute, da ihr mir beim letzten mal so gut geholfen habt, würde ich euch nochmal bitten euch diesen Quellcode anzusehen und mir da ein bisschen zu helfen.
danke schon mal im voraus
procedure TForm1.Button1Click(Sender: TObject);
var
PasswortList, UsernameList : TStringList;
i, n, l, j: integer;
begin
PasswortList:= TStringList.Create;
...