Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

товарищи помогите с процедурой [D7, XP]

RiP © (2005-11-12 09:37:00)
Удалено модератором
Примечание: СПАМ

Virgo_Style (2005-11-12 10:44:00) [1]
RiP (12.11.05 10:40) [5]
объявляю ну это ведь уже неправельно получается

Object Pascal требует объявления переменных, все правильно.

RiP (2005-11-12 10:40:00) [2]
у меня проблема с тем как потом вызвать ету процедуру в кнопке я пишу в ней имя процедуры она требует параметры, пишу параметры, делф говорит что переменные не объявлены объявляю ну это ведь уже неправельно получается

SergP. (2005-11-12 10:38:00) [3]

> RiP (12.11.05 10:34) [3]
> да я хочу вывести в едит отсорт массив

Edit1.text:='';
for i=0 to high(arr) do Edit1.text:=Edit1.text+' '+inttostr(arr[i]);

RiP (2005-11-12 10:34:00) [4]
да я хочу вывести в едит отсорт массив

MBo (2005-11-12 10:32:00) [5]
>снасало надо обьявить тип свой а затем его уж передавать как параметр
Не обязательно. Можно и так, как написано - параметр-открытый массив, и N не передавать, а использовать High(Arr)

procedure SortPuz (var Arr : array of Integer);
var
i, j, Temp : Integer;
begin
for i := 0 to High(Arr) - 1 do
for j:= i+1 to High(Arr) do
if Arr[i] > Arr[j] then begin
Temp := Arr [i];
Arr [i] := Arr [j];
Arr [j] := Temp;
end;
end;

Tonich (2005-11-12 10:08:00) [6]
ты неправильно передаешь массив,
снасало надо обьявить тип свой а затем его уж передавать как параметр
type TMyArray = array of integer procedure SortPuz (var Arr :TMyArray; n : Integer);

а вот про Эдит это что-то не совсем понял, ты что хочешь вывести весь массив в Эдит???

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »