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

Вниз

Массивы и передача параметров...   Найти похожие ветки 

 
ArtemESC ©   (2006-09-29 20:46) [0]

Есть функция
TStringArray: String of Array;
function IndexOfString(str: string; arr: TStringArray): integer;

и есть константа-массив (естественно, не динамический), когда передаю его, как параметр в эту функцию возникает ошибка - как этого избежать?


 
Palladin ©   (2006-09-29 20:53) [1]

заполнить им переменную TStringArray и передать... а еще проще использовать TStringList и не мучать компилятор...


 
Джо ©   (2006-09-29 21:01) [2]

Use open arrays ;)

type
 TStringArray = array of string;

const
 Strings: array [0..1] of string =
   (
     "1",
     "2"
   );

procedure Proc (AStrings: array of string);
begin
end;

procedure TForm1.FormCreate(Sender: TObject);
var
 Sa: TStringArray;
begin
 Proc (Strings);
 Proc (Sa);
end;


 
ArtemESC ©   (2006-09-29 21:10) [3]

Джо ©   (29.09.06 21:01) [2]
Спасибо. Правда, тогда будут другие ограничения...



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

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

Наверх




Память: 0.47 MB
Время: 0.052 c
2-1159635006
Firedg
2006-09-30 20:50
2006.10.15
Работа с HTML


1-1157572502
dexer
2006-09-06 23:55
2006.10.15
Создание формы в нутри объекта


15-1158810548
Pazitron_Brain
2006-09-21 07:49
2006.10.15
Стало надо виртуальную машину...


2-1159419736
aht
2006-09-28 09:02
2006.10.15
Дабл клик на гриде


3-1155799599
samone
2006-08-17 11:26
2006.10.15
Копирование таблиц