[tristan]

Нужна помощь, я написал программу в консольном режиме на Delphi, но я очень плохо знаком c компонентами WinAPI. Я хочу чтоб был проект, например как показанно в моей программе, например поле куда мы вводим сколько компонентов мы должны ввести(Edit1), поле куда мы вводим эти компонеты(Edit2), и поле вывода ответов(Memo).

Код:

program Zadanie2;

{$APPTYPE CONSOLE}

uses
SysUtils;

var
mass: array[1..1000]of integer;
i, n: integer;
{ Удаление элемента ( ов ) }
procedure DeleteElements ( position: integer );
begin
if position < n then begin
mass[position] := mass[position + 1];
DeleteElements ( position + 1 );
end;
end;
{ Добавление элемента ( ов ) }
procedure AddElement ( count, position: integer );
begin
if position <= count then begin
read ( mass[position] );
if mass[position] = 0 then begin
dec ( count );
dec ( n );
AddElement ( count, position );
end else
AddElement ( count, position + 1 );
end;
end;
{ Вывод элемента ( ов ) }
procedure WriteElements ( position: integer );
begin
if position <= n then begin
write ( mass[position], ' ' );
WriteElements ( position + 1 );
end;
end;
begin
write ( 'Vvedite kol-vo elementov: ' );
readln ( n );
writeln ( 'Vvodite elementy spiska cherez probel:' );
AddElement ( n, 1 );
write ( 'Vvedite element: ' );
AddElement ( 1 + n, n + 1 );
inc ( n );
DeleteElements ( 1 );
dec ( n );
WriteElements ( 1 );
writeln;
end. 

Очень прошу помочь.

[Aristarh Dark]

Первый раз вижу человека который неумеет заниматься компонентокиданием - круто.

[tristan]

Помогите люди очень срочно надо.

[barsuk228]

Она у тебя проста сдвигает элементы списка?

[angvelem]

Вместо второго Edit-а, больше подойдёт ComboBox, с уже готовым списком компонентов.