Verfügbare Informationen zu "Textdatei - Zufallszeile auslesen."
Qualität des Beitrags: Beteiligte Poster: Bene - fab-Paswiki.de Forum: Tutorials.at Forenbeschreibung: Programmierforum aus dem Unterforum: Pascal Antworten: 3 Forum gestartet am: Mittwoch 19.04.2006 Sprache: deutsch Link zum Originaltopic: Textdatei - Zufallszeile auslesen. Letzte Antwort: vor 17 Jahren, 7 Monaten, 22 Tagen, 21 Stunden, 44 Minuten
Alle Beiträge und Antworten zu "Textdatei - Zufallszeile auslesen."
Re: Textdatei - Zufallszeile auslesen.
Bene - 28.07.2006, 18:15Textdatei - Zufallszeile auslesen.
Hallo,
ich hab mir letztens ein kleines Vokabelabfrageprogramm geschrieben, aber hab keine ahnung wie ich aus einer .txt datei eine zufallszeile auslesen kann. Währe echt nett, wenn mir da einer helfen könnte..
Bene
Re: Textdatei - Zufallszeile auslesen.
fab-Paswiki.de - 29.08.2006, 02:55
hallo,
das folgende Beispielprogramm sollte funktionieren, es ist relativ simpel programmiert und mit Kommentaren versehen, alles natürlich ohne Gewähr :
uses crt;
var datei : text;
zeile : string;
zufall,index : integer;
zufallmax,i : integer;
begin
randomize;
assign (datei,'c:\zufall.txt');
{$I-}
reset (datei);
{$I+}
if ioresult > 0 then begin
writeln ('Datei nicht gefunden.');
write ('Programm beendet. Weiter mit beliebiger Taste...');
readkey;
halt;
end else
´
while not eof(datei) do begin { ermittelt die anzahl der zeilen der datei }
inc(index);
readln(datei);
end;
close(datei);
reset(datei); {geht zurück zum Anfang der Datei}
zufallmax:=index;
zufall:=random(zufallmax)+1; {ermittelt die zufällige Zeile}
for i:=1 to zufall do
readln(datei,zeile);{geht in diese Zeile und liest sie aus}
writeln(zeile);
close(datei);
readln;
end.
Re: Textdatei - Zufallszeile auslesen.
Bene - 01.09.2006, 13:57
oh danke, werds gleich mal ausprobieren...
Mit folgendem Code, können Sie den Beitrag ganz bequem auf ihrer Homepage verlinken
Weitere Beiträge aus dem Forum Tutorials.at
C++ Tutorial (by progger) - gepostet von progger am Freitag 25.08.2006
Projekt? - gepostet von Dirty Oerty am Sonntag 20.05.2007
@Walgo - gepostet von Xin am Samstag 21.07.2007
Grafikspielereien - gepostet von Dirty Oerty am Samstag 13.01.2007
Bilder in Pascal programmen??? - gepostet von vpascal am Montag 07.05.2007
header-Dateien - gepostet von Ronin am Dienstag 13.06.2006
Programmierung einer Schliessung - gepostet von ChillerT am Dienstag 06.02.2007
Ähnliche Beiträge wie "Textdatei - Zufallszeile auslesen."
Pw aus dem IE auslesen? - Cr@cKl!n (Sonntag 14.01.2007)
xp key von cd auslesen - alina (Mittwoch 08.11.2006)
Stufe 1: Textdatei Zeilenweise auslesen - antome (Samstag 26.08.2006)
Fehlerspeicher selbst auslesen - bmwpower58 (Montag 05.11.2007)
Stars Sternchen auslesen - 4dministr4t0r (Mittwoch 27.12.2006)
Speicherbelegung auslesen - telegaertner (Dienstag 08.03.2005)
Tips & Tricks: Wie kann ich etwas in eine Textdatei schr - HPScript Entwicklung (Donnerstag 19.08.2004)
Tips & Tricks: Ein einfacher Login auf Textdatei basiere - HPScript Entwicklung (Donnerstag 19.08.2004)
Tips & Tricks: Ein einfacher Counter auf Textdatei basie - HPScript Entwicklung (Donnerstag 19.08.2004)
Flashimages auslesen - COMMANDER (Montag 21.08.2006)