Главная страница
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.059 c
1-1155619531
el-eXtremo
2006-08-15 09:25
2006.10.15
есть ли модули по редактированию xml


3-1155280294
rasvv
2006-08-11 11:11
2006.10.15
Базы данных в потоках


3-1155541687
Term
2006-08-14 11:48
2006.10.15
Разница в скорости работы хранимой процедуры


2-1159119975
ZiTrAX
2006-09-24 21:46
2006.10.15
Минимальный размер программы


1-1156672010
Mr tray
2006-08-27 13:46
2006.10.15
Синхронизация