У цій статті я постараюся максимально просто і зрозуміло викласти основи програмування на мові Delphi
// Клас для зберігання даних про співробітника
private String name; // ім'я
private String id; //табельний номер
public EmployeeRecord (String aname, String aid)
public void setName (String aname)
// установка табельного номера
public void setId (String aid)
// отримання табельної номера
// Основний клас додатки
public class Application
Vector employees; // масив для зберігання списку співробітників
FileInputStream stream; // дескриптор файлу з даними про співробітників
DataInputStream data; // потік даних для читання інформації про співробітників
stream = new FileInputStream ( "data.txt");
data = new DataInputStream (stream);
this. createEmployees (); // заповнити масив
this. displayEmployees (); // вивести інформацію
public void createEmployees ()
tmp3 = data. readLine (); // введення рядка
if (tmp3 == null) return; // перевірка на кінець файлу
StringTokenizer tokenizer = new StringTokenizer (tmp3, ",");
tmp1 = tokenizer. nextToken (); // виділимо ім'я
tmp2 = tokenizer. nextToken (); // виділимо табельний номер
EmployeeRecord record = new EmployeeRecord (tmp1, tmp2);