Forum: Programmieren allgemein
by lucy,
7. Nov 2022
hat die Fehlermeldung was mit meiner Delphi - Version XE7 zu tun?
Forum: Programmieren allgemein
by lucy,
6. Nov 2022
Ja!
Schaue mir gleich mal Deinen Quelltext an.
Forum: Programmieren allgemein
by lucy,
6. Nov 2022
ich habe immer beide Varianten getestet! ist natürlich verwirrend :-(
die Liste sollte eigentlich so aussehen:
12345,
67891,
98756,
32656,
usw.
Forum: Programmieren allgemein
by lucy,
6. Nov 2022
Ersetze s3 := StringReplace( List.Strings, ',', '', ); doch mal durch s3 := StringReplace( List.Strings, ',', sLineBreak, ); Wie sieht es jetzt aus?
if s2 = s3 then würde ich auch noch durch if Trim(s2) = Trim(s3) then ersetzen um bei dem Vergleich mögliche Leerzeichen zu ignorieren.
jetzt werden die Zahlen im ShowMessage(s3) aus der Liste untereinandergeschrieben (aber alle Zahlen)...
Forum: Programmieren allgemein
by lucy,
6. Nov 2022
nochmal zum Verstädnis!
hier die aktuelle List: siehe Bild!
s2 ist = "12345"
s3 := StringReplace( List.Strings, ',', '', );
ShowMessage(s3);
Forum: Programmieren allgemein
by lucy,
6. Nov 2022
vielleicht habe ich sonst noch was falsch gesetzt?
procedure TForm1.EingangTimer(Sender: TObject);
var
msg, s, s2, s3: String;
sl, List : TStrings;
i : integer;
begin
if IdTcpClient1.Connected then
Forum: Programmieren allgemein
by lucy,
6. Nov 2022
zu (1) habe beide Varianten mit und ohne ausprobiert
zu (2) Showmessage s2 wird einmal angezeigt
zu (3) es wird immer nur eine Zahl angezeigt zum Beispiel : 1234
habe das Gefühl, als würde aus der Datei immer nur die erste Zeile gelesen
Forum: Programmieren allgemein
by lucy,
6. Nov 2022
die Zahlen stehen untereinander, es wird immer nur die erste Zeile gelesen :-( warum????
Forum: Programmieren allgemein
by lucy,
5. Nov 2022
nein, die Werte sind einmalig in der Datei.
bin noch am experimentieren
habe noch keine Lösung, dass ist auch falsch, glaube ich
List:= TStringList.Create;
List.LoadFromFile(ExtractFilePath(ParamStr( 0 )) + '\List.dat');
for i := 0 to List.Count - 1 do begin
Forum: Programmieren allgemein
by lucy,
5. Nov 2022
ach ja mein Problem :-) richtig in der Datei wird nur die erste Zeile gelesen.
brauche eine Schleife um alle Zeilen zu lesen.
wie könnte so eine Schleife aussehen?
Forum: Programmieren allgemein
by lucy,
5. Nov 2022
Hallo,
würde gernen einen String mit einer Datei (Inhalt) vergleichen.
List:= TStringList.Create;
List.LoadFromFile(ExtractFilePath(ParamStr( 0 )) + '\List.dat');
for i := 0 to List.Count - 1 do begin
if sl.Strings = List then begin