Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Zeichenkette extern abfraben (https://www.delphipraxis.net/193663-zeichenkette-extern-abfraben.html)

G4schi 27. Aug 2017 08:52

Zeichenkette extern abfraben
 
Guten Tag!

Ich bin gerade dabei Delphi zu lernen und ein Galgenmännchenspiel zu programmieren.
Ich würde gerne das gesuchte Wort aus einer externen Datei/Liste abfragen.

Wie ist das zu bewerkstelligen?
In welchem Format müsste die Datei/Liste sein?


MfG G4schi

zeras 27. Aug 2017 08:55

AW: Zeichenkette extern abfraben
 
Nimm einfach eine Textdatei und schreibe alle Worte untereinander. Dann in eine Stringlist laden mit .lodfromfile. Dann kann du diese verwalten und abfragen.

hoika 27. Aug 2017 13:28

AW: Zeichenkette extern abfraben
 
Hallo,
gemeint ist LoadFromFile

Delphi-Quellcode:
var
  SL: TStringList;
begin
  SL:= TStringList.Create;
  SL.LoadFromFile('MeineDatei.txt');

Aviator 27. Aug 2017 15:35

AW: Zeichenkette extern abfraben
 
Jetzt hättest du ihm aber auch noch einen Prozedurkopf, ein try..finally..end und ein SL.Free gönnen können. Dann lernt er es als Anfänger auch gleich richtig. :wink:

Delphi-Quellcode:
procedure LadeDatei();
var
  SL: TStringList;
begin
  SL:= TStringList.Create;
  try
    SL.LoadFromFile('MeineDatei.txt');
    DoSomeThingWithContent(SL);
  finally
    SL.Free;
  end;
end;

haentschman 27. Aug 2017 15:40

AW: Zeichenkette extern abfraben
 
Zitat:

Dann lernt er es als Anfänger auch gleich richtig.
:zwinker: Dann hättest aber auch einen, nach dem LoadFromFile, {mach was mit dem Inhalt Stringliste} Block spendieren müssen.
@TE
Weil im finally Block ist die Instanz wieder zerstört. :zwinker:

Aviator 27. Aug 2017 15:41

AW: Zeichenkette extern abfraben
 
Zitat:

Zitat von haentschman (Beitrag 1379634)
:zwinker: Dann hättest aber auch einen {mach was mit dem Inhalt Stringliste} Block spendieren müssen.

Ja hast Recht. :thumb: :zwinker:

Codehunter 28. Aug 2017 07:36

AW: Zeichenkette extern abfraben
 
OT: Mir fällt auf, es gibt in letzter Zeit wieder öfter Schülerfragen hier. Delphi wird doch nicht etwa dank der kostenlosen Editions in die Schulen zurückkehren? Also ich fände das ja toll. Endlich wieder Nachwuchs mit einer ordentlichen Programmiersprache ;-) Vielleicht gibts dann auch wieder DNU-Fragen. Die vermisse ich in den letzten 15 Jahren irgendwie.

Also mich würde es schon interessieren, ob und wenn ja in welchen Schulen bzw. Bundesländern wieder Delphi im Unterricht vorkommt.

himitsu 28. Aug 2017 09:32

AW: Zeichenkette extern abfraben
 
DNU?

Da haben wir ja schon unseren ersten DAU. :party:


Nunja, nur nutzen viele der Neuen uralte Delphis ... dementsprechend wurde wohl eher aus Lehrermangel der Altbestand nochmal reaktiviert oder jemand ist aus dem Koma erwacht.

Codehunter 28. Aug 2017 13:06

AW: Zeichenkette extern abfraben
 
Zitat:

Zitat von himitsu (Beitrag 1379690)
DNU?

Da haben wir ja schon unseren ersten DAU. :party:

Uralter Running Gag aus Spotlight-Zeiten. Aus irgendeinem Grund war es damals schwer in Mode, sein Programm im Hintergrund laufen und als Symbol in der Task Notification Area (TNA) anzeigen zu lassen. Es gab praktisch jede Woche eine Frage dazu. Nur wusste niemand wie das Ding Neben der Uhr heißt. Deswegen heißt die TNA in manchen Delphi-Kreisen bis heute noch DNU.


Alle Zeitangaben in WEZ +1. Es ist jetzt 20:03 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