AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Zeichenlänge eines Memo zu klein

Ein Thema von Hansi · begonnen am 18. Okt 2013 · letzter Beitrag vom 21. Okt 2013
Antwort Antwort
Seite 1 von 3  1 23      
Hansi

Registriert seit: 8. Okt 2004
271 Beiträge
 
#1

Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 14:37
Hallo,

über folgenden Code lade ich mir eine txt-Datei aus dem Internet in mein einfaches Programm und arbeite dann Zeile für Zeile ab. Seit neuestem gibt es aber ein Problem, dass die Zeilen zu lang für das TMemo sind und der Inhalt einer Zeile umgebrochen wird.
Kann ich die möglichen Zeichenmenge eines TMemo vergrößern?

Code:
url := 'http://www.xxx.com/daten.txt';

  try
    daten := IdHTTP1.get(url);
  Except
    Memo1.Lines.Add('URl existiert nicht!');
    Exit;
  end;

  Memo1.Lines.Add(daten);


  For i := 1 to Memo1.Lines.Count - 1 do begin
  Application.ProcessMessages;
  s := Memo1.Lines[i];
  ...
  end;
  Mit Zitat antworten Zitat
Benutzerbild von Bernhard Geyer
Bernhard Geyer

Registriert seit: 13. Aug 2002
17.188 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 14:41
Musst du es denn in ein Memo Laden?
Würde nicht das halten in einer Stringliste reichen?
Windows Vista - Eine neue Erfahrung in Fehlern.
  Mit Zitat antworten Zitat
Hansi

Registriert seit: 8. Okt 2004
271 Beiträge
 
#3

AW: Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 14:44
ne es muss kein Memo sein. Ich will es ja nur "temporär" Speichern um es zeilenweise auszulesen
  Mit Zitat antworten Zitat
hathor
(Gast)

n/a Beiträge
 
#4

AW: Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 14:45
For i := 1 to Memo1.Lines.Count - 1 do begin
???
For i := 0 to Memo1.Lines.Count - 1 do begin

Memo.Lines[] ist ein StringArray, das wie ein Array 0-indiziert ist.

Ausserdem:
Memo1.Lines.Add(daten);
besser:
Memo1.text:= daten;

Geändert von hathor (18. Okt 2013 um 14:52 Uhr)
  Mit Zitat antworten Zitat
Hansi

Registriert seit: 8. Okt 2004
271 Beiträge
 
#5

AW: Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 14:47
@hathor: Ja weil in der ersten Zeile die Spaltenüberschriften stehen
  Mit Zitat antworten Zitat
WoGe

Registriert seit: 16. Jun 2005
Ort: Kelkheim
178 Beiträge
 
Delphi 10.3 Rio
 
#6

AW: Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 14:52
TListbox ist hier eventuell besser geeignet.
Kein Zeilenumbruch und visuell

Gruß
wo
  Mit Zitat antworten Zitat
Perlsau
(Gast)

n/a Beiträge
 
#7

AW: Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 14:55
Die Menge der Zeichen, die ein TMemo aufnehmen kann, ist grundsätzlich nicht begrenzt bzw. findet ihre Grenze am verfügbaren Arbeitsspeicher. Zeilen werden umgebrochen, wenn die ClientWidth des Memos nicht für ihre Darstellung ausreicht. Ich würde dir daher empfehlen, mit einer globalen Stringliste statt mit einem (globalen) Memo zu arbeiten und das Memo gegebenenfalls zur Darstellung einzusetzen, nicht jedoch zur Verarbeitung deiner Daten.

Delphi-Quellcode:
 ...
  PRIVATE
   Var
      FehlerListe : TStrings;


Implementation

Procedure TFormMain.FormCreate(Sender: TObject);
begin
  FehlerListe := TStringList.Create;
end;

Procedure TFormMain.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
  FehlerListe.SaveToFile(Dateiname);
  FehlerListe.Free;
  CanClose := True;
end;

Procedure TForm1.Runterladen;
Var
  Url : String;
begin
 
  ...
  url := 'http://www.xxx.com/daten.txt';

  try
    daten := IdHTTP1.get(url);
    FehlerListe.Append(daten);
  Except
    FehlerListe.Append(e.message + ': "' + url + '"');
    Exit;
  end;



  For i := 0 to FehlerListe.Count - 1 do
  begin
    Application.ProcessMessages;
    s := FehlerListe[i];
    ...
  end;

Geändert von Perlsau (18. Okt 2013 um 16:25 Uhr)
  Mit Zitat antworten Zitat
Hansi

Registriert seit: 8. Okt 2004
271 Beiträge
 
#8

AW: Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 15:19
ok vielen Dank...

laden tut; nur bei Fehlerliste.Count ist der Wert immer 1 und nicht die Anzahl an Zeilen.
  Mit Zitat antworten Zitat
Perlsau
(Gast)

n/a Beiträge
 
#9

AW: Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 15:23
Welche Anzahl erwartest du denn?
  Mit Zitat antworten Zitat
Hansi

Registriert seit: 8. Okt 2004
271 Beiträge
 
#10

AW: Zeichenlänge eines Memo zu klein

  Alt 18. Okt 2013, 15:26
exakt 2854 Zeilen
(wenn ich es exportiere nach Excel)
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 3  1 23      


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:49 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz