Delphi Bir Dictionary'i Filtreleyip Yeni Bir Dictionary Yaratma Örneği

306 Okunma Delphi

"Delphi" Programlama dilinde "Bir Dictionary'i Filtreleyip Yeni Bir Dictionary Yaratma Örneği" ile ilgili örnek kod aşağıda verilmiştir. 

program DictExample;

{$APPTYPE CONSOLE}

uses
  System.SysUtils;

var
  d1: array[Char, Char] of Integer;
  l1: array[0..2] of Char;
  new_dict: array[Char, Char] of Integer;
  i: Integer;
begin
  d1['A', ' '] := 65;
  d1['B', ' '] := 66;
  d1['C', ' '] := 67;
  d1['D', ' '] := 68;
  d1['E', ' '] := 69;
  d1['F', ' '] := 70;

  l1[0] := 'A';
  l1[1] := 'C';
  l1[2] := 'F';

  for i := 0 to 2 do
    new_dict[l1[i], ' '] := d1[l1[i], ' '];

  for i := 0 to 2 do
    WriteLn(l1[i], ': ', new_dict[l1[i], ' ']);
end.
Dictionary Yarat Filtre Yeni Dizi Delphi

İlginizi Çekebilir

Delphi Sayıların Geometrik Ortalamasını Bulma Örneği

Delphi Dizideki Herhangi Bir Konuma Eleman Ekleme Örneği

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

Delphi Üç Kenarı Verilen Bir Üçgenin Alanını Bulma

Delphi Stringin Tersten Okunuşu İle Aynı Olduğunu Kontrol Eden Ör ...