Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Textbestand dumpen?? (https://www.delphipraxis.net/61891-textbestand-dumpen.html)

Julia82 27. Jan 2006 17:40


Textbestand dumpen??
 
Hallo!

Ich besuche gerade einen Einsteiger-Delphi Kurs und benötige Hilfe bei folgendem:
1.) einen Textbestand in einem memo Fenster erscheinen lassen, bei dem es auf die Länge nicht ankommt. Dazu muss ich den Tekstbestand "dumpen"-weiss aber leider nicht was das ist. (Ich darf nicht Memo1.lines.LoadFromFile verwenden!!)
Bisher weiss ich nur wie mal einzelne strings oder Zeilen einliest - 1.AssignFile 2. Reset 3. Read/Readln 4.memo 5.CloseFile

2.) einen Tektbestand mit 10 Zahlen in einem memo zeigen lassen und dabei mit einem array und einem loop arbeiten. Den Durchschnitt der 10 Zahlen muss anschließend in einem memo zu sehen sein.

Ich hoffe jemand macht sich die Mühe um mir zu helfen!
Ich bedanken mich schon mal ganz lieb im Vorraus!!

Lg, Julia

marabu 27. Jan 2006 18:38

Re: Textbestand dumpen??
 
Herzlich Willkommen in der Delphi-PRAXiS, Julia.

Keine Ahnung was du mit Dumpen meinst. Da du gerade Schleifen kennenlernst - auch eine Textdatei kannst du in einer Schleife einlesen:

Delphi-Quellcode:
var
  tf: TextFile;
  line: String;
begin
  AssignFile(tf, '');
  Reset(tf);
  while not Eof(tf) do
  begin
    ReadLn(tf, line);
    // hier kommt dein Code hin
  end;
  CloseFile(tf);
end;
Eventuell wirst du noch die Funktion Delphi-Referenz durchsuchenStrToInt() brauchen um deine Zahlen, die du aus der Textdatei als Zeichenketten einliest, zur Berechnung des Durchschnitts addieren zu können.

Grüße vom marabu

Daniel G 27. Jan 2006 18:43

Re: Textbestand dumpen??
 
Zitat:

Zitat von marabu
Keine Ahnung was du mit Dumpen meinst.

Wir hatten damals im Info - Unterricht 'nen "HexDump" - Programm geschrieben. Ich hätte dazu "HexEditor ohne Editierfunktion" gesagt. Mit Dumpen meint sie also wohl einfach nur das einlesen und anzeigen von Daten. :zwinker:

marabu 27. Jan 2006 19:12

Re: Textbestand dumpen??
 
Danke Daniel, das konnte ich nicht wissen - ich hatte nie Info-Unterricht.

Wenn du Recht hast, dann braucht die einsteigende Julia auch noch Delphi-Referenz durchsuchenIntToHex():

Delphi-Quellcode:
var
  hex, s: String;
  code, i: Integer;
begin
  s := '1234567890'
  for i := 1 to Length(s) do
  begin
    code := Ord(s[i]);
    hex := IntToHex(code, 2);
    ShowMessage(Format('Stelle %d Zeichen %s Codewert %d Hexwert %s', [i, s[i], code, hex]));
  end;
end;
marabu


Alle Zeitangaben in WEZ +1. Es ist jetzt 17: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 by Thomas Breitkreuz