Einzelnen Beitrag anzeigen

Benutzerbild von Stanlay Hanks
Stanlay Hanks

Registriert seit: 1. Mär 2003
2.078 Beiträge
 
Delphi 2005 Professional
 
#4
  Alt 27. Mai 2003, 14:43
Das müsstest du mit Random angeben.
Zuerst liest du alle Sections in eine StringList oder so was ein, und ermittelst mit Count, wie viele Fragen es sind.
Dann liest du nach dem Zufallsprinzip eine Section aus:

Delphi-Quellcode:
var Ini : TIniFile;
begin
Ini := TIniFile.create('C:\Fragen.ini');
Try
Edit1.text := Ini.ReadString('Frage'+IntToStr(Random(a),'Frage','Unbekannt'); //a = Anzahl der Fragen in der Ini
finally
FreeAndNil(Ini);
end;
Müsste so stimmen, hab ich aber nicht getestet.
Man liest sich, Stanlay
  Mit Zitat antworten Zitat