Comparison of programming languages (associative array): Difference between revisions

Revision as of 12:15, 10 September 2016

Revision as of 17:16, 18 April 2017

Line 213:

=== [[Borland Delphi|Delphi]] ===

Delphi 2009 introduced support for generics as well assupports several standard generic containers, including TDictionary.<T>:

Versions of Delphi prior to 2009 do not offer direct support for associative arrays. However, you can simulate associative arrays using TStrings object. Here's an example:

<source lang=Delphi>

uses

SysUtils,

Generics.Collections;

var

PhoneBook: TDictionary<string, string>;

Entry: TPair<string, string>;

begin

PhoneBook := TDictionary<string, string>.Create;

PhoneBook.Add('Sally Smart', '555-9999');

PhoneBook.Add('John Doe', '555-1212');

PhoneBook.Add('J. Random Hacker', '553-1337');

for Entry in PhoneBook do

Writeln(Format('Number for %s: %s',[Entry.Key, Entry.Value]));

end.

</source>

Versions of Delphi prior to 2009 do not offer direct support for associative arrays. However, you can simulate associative arrays using the TStrings objectclass. Here's an example:

<source lang=Delphi>

Line 238 ⟶ 259:

DataField.Free;

end;

</source>

Delphi 2009 introduced support for generics as well as several standard generic containers, including TDictionary.

<source lang=Delphi>

uses

SysUtils,

Generics.Collections;

var

PhoneBook: TDictionary<string, string>;

Entry: TPair<string, string>;

begin

PhoneBook := TDictionary<string, string>.Create;

PhoneBook.Add('Sally Smart', '555-9999');

PhoneBook.Add('John Doe', '555-1212');

PhoneBook.Add('J. Random Hacker', '553-1337');

for Entry in PhoneBook do

Writeln(Format('Number for %s: %s',[Entry.Key, Entry.Value]));

end.

</source>