Главная страница
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.075 c
2-1159467945
Ezorcist
2006-09-28 22:25
2006.10.15
Выдернуть подструку из строки


5-1141035730
Pazitron_Brain
2006-02-27 13:22
2006.10.15
TEmbeddedWB


15-1158917616
Stanislav
2006-09-22 13:33
2006.10.15
SQL В MSSQL


15-1158931308
Megabyte
2006-09-22 17:21
2006.10.15
Firebird 2.0 и IB_Expert 2.5.0.22


3-1156062254
BoikoAV
2006-08-20 12:24
2006.10.15
Кто пользовался компонентом MasterView? Помогите...