![]() |
Wörter aus einer Datei holen
Hi,
ich möchte das Wörter aus einer Text Datei im Programm verwendet werden. Der Benutzer gibt also bei der Suche keine Wörter mehr ein, sondern die werden zufällig aus der Datei "worte.txt" entnommen und ins TEdit eingefügt und der Timer drückt auf den button. Also das programm was ich geschrieben habe, soll ganz von alleine alle 60 -120 sekunden eine neue "normale" suche starten (Keine Google API) Suche, und damit der User keine Wörter eingeben muss, werden die Aus einer Datei entnommen (Zufällig). Soweit ist alles fertig, ich muss nur noch das mit der TextDatei machen, kann mir da jemand bitte helfen ? :angel: |
Re: Wörter aus einer Datei holen
Wenn die einzelnen Worte untereinander in der Datei stehen, kannst du sie einfach per
![]() ![]()
Delphi-Quellcode:
Nicht vergessen, einmal Randomize aufzurufen (am besten im OnCreate).
Edit.Text := StringList.Strings[Random(StringList.Count)];
|
Re: Wörter aus einer Datei holen
Zitat:
|
Re: Wörter aus einer Datei holen
Hi!
Wozu findest du nix? Ciao Frederic |
DP-Maintenance
Dieses Thema wurde von "alcaeus" von "Internet / LAN / ASP.NET" nach "Sonstige Fragen zu Delphi" verschoben.
Aus Dateien lesen gehoert auch nicht in die Internetsparte :roll: |
Re: Wörter aus einer Datei holen
Ich denk mal das LoadFromFile muss so sein, oder?
Delphi-Quellcode:
Was ich nicht verstehe, wo kommt der Datei name hin ?
procedure LoadFromFile(const FileName: string);
begin end; (const FileName:=(words.txt) string); usw. funktioniert alles nicht, (const words.txt string); auch nicht :( |
Re: Wörter aus einer Datei holen
Delphi-Quellcode:
memo1.lines.loadfromfile('irgendwas.txt');
|
Re: Wörter aus einer Datei holen
Hi manakinn,
auch wenn es jetzt nicht zum Thema passt, lege ich dir dieses ![]() |
Re: Wörter aus einer Datei holen
@XeRo: Warum ein Memo? manakinn will das Wort doch in einem Edit, da reicht eine zur Laufzeit erstellte StringList vollkommen.
@Spider: Du nimmst mir die Worte aus dem Mund :wink: . [edit]Um es klar auszudrücken: LoadFromFile ist eine Methode von TStringList. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:30 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz