Главная страница
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.031 c
2-1159443497
Valery779
2006-09-28 15:38
2006.10.15
SaveToClipboardFormat


5-1141114827
Creative
2006-02-28 11:20
2006.10.15
ссылка на объект в строке StringGrid`а


11-1131354447
homm
2005-11-07 12:07
2006.10.15
А вот такой еще глюк нашел...


15-1158733932
Проггер
2006-09-20 10:32
2006.10.15
перенос D5


2-1159174243
KyRo
2006-09-25 12:50
2006.10.15
Как сделать прозрачным лейбл