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 Sayıların Geometrik Ortalamasını Bulma Örneği

Delphi Bir Stringteki Küçük Harfleri Öne Alma Örneği

Delphi Yarıçap Girilen Bir Dairenin Çevre ve Alanını Bulma Örneği

Delphi Bir Stringin İlk Orta ve Son Karakterini Alma Örneği

Delphi Bir Sayının Rakamlarının Toplamını Bulma Örneği