Alle arten von Stringbefehlen

[MisterNiceGuy]

Hi, bis jetzt hab ich mich immer mit dem Schreiben blöder Fuktionen durchgemogelt.

Beispiel:

Delphi-Quellcode:

function TForm1.filtered(message1:string):string;
var i,j,k,l:integer;
begin
j:=0;
for i:=1 to length(message1) do
begin
     if message1[i] = '\' then
        j:=j+1;
     if j = 21 then
     begin
         filter1 := i+6;
         break;
     end;
end;
for k:=filter1+1 to length(message1) do
begin
        if message1[k] = '\' then
        filter2 := k-1;
end;
for l:=filter1 to filter2 do
result := result + message1[l];
end;

Kann mir bitte mal jemand häufig verwendete Stringoperationen zeigen? Wär echt nett, damit spar ich mir den Sch***

[edit=sakura] [code] durch [delphi] ersetzt Mfg, sakura[/edit]

THX, nächstes mal mach ich's besser

[shmia]

Merk dir eine Stringfunktion (z.B. Copy oder Pos). In der IDE eintippen und F1 für Hilfe drücken.
Danach kannst du auf "string handling routines" klicken und hast die ganze Sammlung der Grundfunktionen.
Ebenso merkst du dir ExtractFileName und kommst so auf die "file name utilities".

[Nicodius]

concat(str1, str2 ...) = Zusammenfügen mehrerer Strings
Delete(Str, Index, Count);( = löschen im string --> Str = in welchen string, Index ab welcher position count wiviele zeichen ab index gelöscht werden sollen
Copy(Str, Index, Count: Integer): string; = kopieren eines teilstrings
--> Str = in welchen string, Index ab welcher position count wiviele zeichen ab index kopiertwerden sollen

Zitat:

S ist ein Ausdruck des Typs String oder dynamisches Array. Index und Count sind Integer-Ausdrücke. Copy gibt einen Substring oder ein Array zurück, das Count Zeichen oder Elemente ab S[Index] enthält.

so stehts in der delphihilfe


Pos(str,str2) = gibt die position des ersten vorkommens von str in str2 zurück(0 = str1 ist nicht enthalten in str2)

das wären die allerwichtigsten


mfg+

Nicodius

[ibp]

...siehe oh unit system

Delphi-Quellcode:

comparestr
insert
inttostr
length
lowercase
newstr
uppercase
val
...

[Nicodius]

stimmt auch noch wichtig :

length(str) = gibt die länge des strings str zurück

Insert(str1, str2, i) =

Zitat:

Insert fügt Source in S an der Position S[Index] ein.

Source ist ein String-Ausdruck und S eine String-Variable beliebiger Länge. Der Integer-Ausdruck Index ist ein Zeichen-Index und kein Byte-Index.

Wenn Index kleiner als 1 ist, wird 1 verwendet. Wenn der Wert von Index größer als die Länge des Strings ist, wird die Länge des Strings verwendet und der Teilstring angehängt (Append).

Wenn der Parameter Source ein leerer String ist, führt Insert nichts aus.

Insert löst eine EOutOfMemory-Exception aus, wenn nicht genügend Speicherplatz für den Rückgabe-String zugewiesen werden kann.

lower/uppercase = klein(low) groß(up) schreibung




edit: für was brauchst man Jetzt noch newstr?

Zitat:

NewStr ist in Delphi nur aus Gründen der Abwärtskompatibilität vorhanden.

[Luckie]

Ähm, Leute, was wollt ihr jetzt hier die ganze Delphi-Hilfe posten? Ich meine was soll das? Er kann doch schließlich selber nachkucken.

[Nicodius]

warum machen wir denn überhaupt tutorials: gibts viele auc hscghon in adneren delphiforen/delphi-source


eben

[Luckie]

Das ist ja wohl etwas anderes als hier wortwörtlich die Delphi Hilfe zu zitieren.

[Nicodius]

nur weil die zitate zitate sidn der rest ist fast eigenhändig geschrieben ^^

mei luckie : --> ich will ihm nur direkt helfen ich freu mich eh schon auf deine idee mit dem "in der delphi hilfe nachschlagen"