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

44 Okunma Delphi

"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.
String Lower Küçük Önce Karakter Delphi

İlginizi Çekebilir

Delphi Bir Dizideki Tek Sayıların Adetini Bulma Örneği

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

Delphi Bir Sayının Tek Mi Çift Mi Olduğunu Göstermek

Delphi Bir Stringi Ters Çevirmek

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