Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.27;
Скачать: CL | DM;

Вниз

товарищи помогите с процедурой   Найти похожие ветки 

 
RiP   (2005-11-12 09:37) [0]

Удалено модератором
Примечание: СПАМ


 
Tonich ©   (2005-11-12 10:08) [1]

ты неправильно передаешь массив,
снасало надо обьявить тип свой а затем его уж передавать как параметр

type
TMyArray = array of integer

procedure SortPuz (var Arr :TMyArray; n : Integer);


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


 
MBo ©   (2005-11-12 10:32) [2]

>снасало надо обьявить тип свой а затем его уж передавать как параметр
Не обязательно. Можно и так, как написано - параметр-открытый массив, и 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;


 
RiP   (2005-11-12 10:34) [3]

да я хочу вывести в едит отсорт массив


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


> 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:40) [5]

у меня проблема с тем как потом вызвать ету процедуру в кнопке я пишу в ней имя процедуры она требует параметры, пишу параметры, делф говорит что переменные не объявлены объявляю ну это ведь уже неправельно получается


 
Virgo_Style ©   (2005-11-12 10:44) [6]

RiP   (12.11.05 10:40) [5]
объявляю ну это ведь уже неправельно получается


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



Страницы: 1 вся ветка

Текущий архив: 2005.11.27;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.041 c
2-1130952630
12next
2005-11-02 20:30
2005.11.27
добвить свою процедуру, в событие..


4-1127571941
АлЁша
2005-09-24 18:25
2005.11.27
Посылка сообщений


14-1131469401
nop
2005-11-08 20:03
2005.11.27
Стиль оформления кода


4-1127662855
Евгений Р.
2005-09-25 19:40
2005.11.27
изменение системного времени на компьютере


11-1112073636
DmiSb
2005-03-29 09:20
2005.11.27
Как положить панель на нужную страницу TabConrol`a