Ich bin Programmieranfänger und versuche gerade ein Quiz mit Delphi6 zu entwerfen.
Konkret: In einem Formular soll ein Label existieren in dass die Fragen kommen sollen, ein Edit-Fenster in der man die Antwort eingeben kann und einen Button zum Drücken nach Eingabe der Antwort. Fragen und Antworten sollen in einer INI-Datei gespeichert werden.
Borlander hat mir bisher sehr geholfen doch jetzt komm ich nicht weiter.
Hier mal mein Quelltext in dem es wahrscheinlich noch sehr chaotisch zugeht, vielleicht könnt ihr mir ein paar Tipps dazu geben:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
Label1: TLabel;
Button2: TButton;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
TIniFile;
TStringList;
implementation
{$R *.dfm}
begin
OnCreate Form1;
QuizData := TIniFile.Create(\'quiz.dat\');
Antwort := QuizData.ReadString(\'[quiz]\');
QuestionList := TStringList.Create;
ReadSection(\'quiz\');
ReadString(\'QuestionList\');
QuestionList[Nummer];
end
procedure TForm1.Button1Click(Sender: TObject);
begin
QuizData.Read(\'quiz\')
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
QuizData.free;
QuestionList.free;
Close;
end;
end.
Einerseits glaube ich, dass hier und da noch einige Buchstaben fehlen, und andererseits, dass
einige der Befehle an der falschen Stelle stehen. Vielen Dank für Eure Mühe im Voraus !!! geoli
Programmieren - alles kontrollieren 4.935 Themen, 20.615 Beiträge
Ich werd mir das gleich mal ansehen...