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 Santigrat Cinsinden Sıcaklığı Fahrenheit'e Çevirmek

Delphi 1 İle 100 Arasında 3'e Bölünebilenleri Bulma Örneği

Delphi Bir Stringin Ortadaki Üç Karakterini Bulma Örneği

Delphi Döngü İle Bir Dizideki En Büyük Sayıyı Bulma Örneği

Delphi Bir Stringde Tam Sayılar Dışındaki Karakterleri Kaldırma Ö ...