Delphi-PRAXiS
Seite 1 von 3  1 23      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Umwandlung TStrings in Integer (https://www.delphipraxis.net/92842-umwandlung-tstrings-integer.html)

punker-lili 27. Mai 2007 11:16


Umwandlung TStrings in Integer
 
Hallo!:hi:
Ich möchte gerne die Werte meiner StringList in Integerwerte umwandeln. Ich habees schon mit StrToInt versucht, aber da beschwert sich der Compiler "Incompatible types:'String' and 'TStrings'".

Könnte mir bitte jemand helfen?!

Danke Anna

mkinzler 27. Mai 2007 11:18

Re: Umwandlung TStrings in Integer
 
Wie gesagt du kannst eine Stringliste nicht in Integer wandeln, sondern nur die darin enthaltene Strings

Delphi-Quellcode:
for i := 0 to StringListe.ItemsCount -1 do
begin
    ... := StrToInt(StrngListe.Items[i]);
end;

punker-lili 27. Mai 2007 11:27

Re: Umwandlung TStrings in Integer
 
Was bedeutet "items"?:gruebel: Denn der Compiler beschwert sich, dass es nich declariert wurde.

EDatabaseError 27. Mai 2007 11:31

Re: Umwandlung TStrings in Integer
 
Zitat:

Zitat von mkinzler
Wie gesagt du kannst eine Stringliste nicht in Integer wandeln, sondern nur die darin enthaltene Strings

Delphi-Quellcode:
for i := 0 to StringListe.ItemsCount -1 do
begin
    integerarray[i] := StrToInt(StringListe.Items[i]);
end;

Da war ein Tippfehler ;-)

GuenterS 27. Mai 2007 11:51

Re: Umwandlung TStrings in Integer
 
Zitat:

Zitat von EDatabaseError
Zitat:

Zitat von mkinzler
Wie gesagt du kannst eine Stringliste nicht in Integer wandeln, sondern nur die darin enthaltene Strings

Delphi-Quellcode:
for i := 0 to StringListe.ItemsCount -1 do
begin
    integerarray[i] := StrToInt(StringListe.Items[i]);
end;

Da war ein Tippfehler ;-)

Hast du das Probiert? Weil ItemsCount kennt die OH bei ner Stringliste gar nicht, genauso wie Items, deshalb würde ich folgenden Code vorschlagen:

Delphi-Quellcode:
for i := 0 to StringListe.Count -1 do
begin
    ... := StrToInt(StringListe.Strings[i]);
end;

punker-lili 27. Mai 2007 11:58

Re: Umwandlung TStrings in Integer
 
hab beides versucht.. aber keins funktioniert...
bei der zweiten möglichkeit beschwert er sich wieder, dass manString und TStrings nicht kombinieren kann... :pale:

GuenterS 27. Mai 2007 12:02

Re: Umwandlung TStrings in Integer
 
Vielleicht solltest uns jetzt ein wenig von dem Code zeigen der Probleme macht, sonst können wir nur noch raten, was du meinst.

Klaus01 27. Mai 2007 12:04

Re: Umwandlung TStrings in Integer
 
Kannst Du Deine Versuche einmal in hinein stellen?

Grüße
Klaus

punker-lili 27. Mai 2007 12:13

Re: Umwandlung TStrings in Integer
 
Delphi-Quellcode:
rocedure TForm1.ffnen1Click(Sender: TObject);
var
  F: TStringList;
  i,j: Integer;
begin
  if not opendialog1.execute then exit;
  F := TStringList.Create;
        try
          with StringGrid1 do
          begin
              F.LoadFromFile(OpenDialog1.FileName);
              RowCount := StrToInt(F[0]);                 // Zeilen
              ColCount := StrToInt(F[1]);                 // Spalten
              Edit1.Text := F[1];
              Edit2.Text := F[0];
              for i := 0 to (RowCount - 1) do // Zeilen M1 
                Rows[i].CommaText := StrtoInt F[i+2];
// 1.Versuch          
              for j := 0 to F.itemsCount - 1 do
               begin
                 rows[j]:= StrToInt(F.Items[j]);
               end;
//2.Versuch
              for j := 0 to F.itemsCount - 1 do
               begin
                 integerarray[j]:= StrToInt(F.Items[j]);
               end;

//3.versuch
              for j := 0 to StringListe.Count -1 do
               begin
                 rows[j] := StrToInt(F.Strings[j]);
               end;
               
          end;
         finally
          FrreAndNil(F);
         end;


end;
Das waren die dreiversuche, wobei keiner funktioniert hat... :cry:

mkinzler 27. Mai 2007 12:21

Re: Umwandlung TStrings in Integer
 
Delphi-Quellcode:
for j := 0 to StringListe.Count -1 do
begin
    integerarray[j := StrToInt(F.Strings[j]);
end;


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:25 Uhr.
Seite 1 von 3  1 23      

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