Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Aus n Strings in einem Array einen String machen?! (https://www.delphipraxis.net/11597-aus-n-strings-einem-array-einen-string-machen.html)

Zyro 10. Nov 2003 13:15


Aus n Strings in einem Array einen String machen?!
 
Wie kann ich, wenn ich zbsp. Ein Array mit 2 feldern habe in dem jeweils ein String steht, diese beiden strings zu einem zusammenfassen?

Aber so, das ich dazwischen noch Platzhalter für variablen hab. Also:

Feld[0]='Select';
Feld[1]='from';

und nacher soll das so einen String ergeben:

'Select'+variable+'from'+variable+'';

Und wenn ich dann halt 3 Felder habe soll er nicht nur die 2 Befehle sondern halt die 3 Befehle so zusammen würfeln.:D

Tyrael Y. 10. Nov 2003 13:26

Re: Aus n Strings in einem Array einen String machen?!
 
hi,

mal so kurzgefasst

Wert[] istein array, in dem du deinen Werte der reihe nach packst, z.B. Tabellenname,...usw

Delphi-Quellcode:
for i := 0 to Length(Feld) do
begin
MeinString := MeinString + Feld[i] + Wert[i];
end;

gruß

tyrael

wenn noch fragen dann poste die frage

Karsten 10. Nov 2003 13:30

Re: Aus n Strings in einem Array einen String machen?!
 
ResString initialisieren,

Schleife: 0 bis ArraySize -1 (Laufvariable ist n)

und dann (Davon ausgehend dass variable von Type integer ist)

ResString := ResString + Feld[n] + IntToSTr(variable):

Gruss,
Karsten

choose 10. Nov 2003 14:05

Re: Aus n Strings in einem Array einen String machen?!
 
Schau Dir mal die Format-Funktion in der OH an. Mit ihrer Hilfe könntest Du zB folgendes erreichen (ungetestet):
Delphi-Quellcode:
myName:= 'choose';
myQualifier:= 'großen';
mySize:= 42.23;
Result:= Format('%s hat %s Hunger (genau: %dm und %dcm)',
  [myName, myQualifier, Trunc(mySize), Frac(mySize)*00]);
//Result == 'choose hat großen Hunger (genau 42m und 23cm)'


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