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

"Delphi" Programlama dilinde "Bir Stringteki Küçük Harfleri Öne Alma Örneği" ile ilgili kod örneği aşağıdadır.

program SortString;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
  str1, sorted_str: string;
  i: integer;
  lower, upper: TStringList;
begin
  str1 := 'YazLiM';
  writeln('Orjinal String: ', str1);

  lower := TStringList.Create;
  upper := TStringList.Create;
  for i := 1 to Length(str1) do
  begin
    if (str1[i] >= 'a') and (str1[i] <= 'z') then
      lower.Add(str1[i])
    else
      upper.Add(str1[i]);
  end;

  sorted_str := lower.Text + upper.Text;
  writeln('Sonuç: ', sorted_str);
end.



İlginizi Çekebilir

Delphi Bir String İçinde Başka Bir Stringin Adetini Bulma Örneği

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

Delphi Dikdörtgenin Alanını Hesaplama Örneği

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

Delphi 1'den 100'e Kadar Çift Sayı Toplam Örneği