Programmieren - alles kontrollieren 4.935 Themen, 20.615 Beiträge

Quiz mit Delphi 6 Hilfe

geoli / 2 Antworten / Flachansicht Nickles

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

bei Antwort benachrichtigen
Borlander geoli „Quiz mit Delphi 6 Hilfe“
Optionen

Ich werd mir das gleich mal ansehen...

bei Antwort benachrichtigen