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 Stringin İlk Orta ve Son Karakterini Alma Örneği

Delphi Bir Sayının Asal Sayı Olup Olmadığını Bulma Örneği

Delphi Bir Stringdeki Her Karakterin Sayısını Bulma Örneği

Delphi Bir String İçindeki Sayıların Toplamını Bulma Örneği

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