Delphi Bir Stringi Ters Çevirmek

"Delphi" Programlama dilinde "Bir Stringi Ters Çevirmek" ile ilgili kod örneği aşağıda gösterilmiştir.

function ReverseWords(const Sentence: string): string;
var
  Words, NewWordList: TArray;
  Word: string;
  I: Integer;
begin
  Words := Sentence.Split([' ']);
  SetLength(NewWordList, Length(Words));
  for I := 0 to High(Words) do
  begin
    Word := Words[I];
    NewWordList[I] := ReverseString(Word);
  end;
  Result := string.Join(' ', NewWordList);
end;

var
  Str1: string;
begin
  Str1 := 'Yazilim Güzeldir.';
  WriteLn(ReverseWords(Str1));
end.



İlginizi Çekebilir

Delphi Dictionary'deki Değerler İle Listenin Elemanlarını Eşleşti ...

Delphi Bir Listede Birden Çok Olan Elemanları Göstermek

Delphi Dictionary Key Value Değerlerini Ters Çevirmek

Delphi Bir Dizi Kullanarak N Sayının Toplamını Bulma Örneği

Delphi İkinci Dereceden Bir Denklemin Köklerini Bulma Örneği