как заполнить Array of const массивом array of string или присвои

← →
D Purple (2004-03-26 16:40) [0]

как заполнить Array of const массивом array of string или присвоить каким либо образом

← →
Smithson © (2004-03-26 16:41) [1]

в цикле

← →
D Purple (2004-03-26 16:44) [2]

Пример кода если можно, вообще то напрямую не заполняется!

← →
Smithson © (2004-03-26 16:47) [3]

Приведи пример кода, если можно, а то не понятно, что у тебя не запоняется.

← →
han_malign © (2004-03-26 17:04) [4]

если нужно передать параметры в функцию, то примерно так:
type TConstArray = Array[word]or TVarRec; PConstArray = ^TConstArray; function FakeArray(aArr: array of string); var pArr: PConstArray; i: integer; begin Getmem(pArr,Length(aArr)*Sizeof(pArr[0])); for i:=0 to High(aArr)do begin pArr[i].VType:=vtAnsiString; pArr[i].VPointer:=Pointer(aArr[i]); end; ConstArrayFunction(Slice(pArr^,Length(aArr))); FreeMem(pArr); end;

← →
D Purple (2004-03-26 17:04) [5]

procedure ImportKSIPData(AValues : array of string);
ArrayValues : array of TVarRec;
begin
надо что-то типа (утрированно)
ArrayValues := ArrayValues
end;

← →
D Purple (2004-03-26 17:07) [6]

Вернее

procedure ImportKSIPData(AValues : array of string);
ArrayValues : array of TVarRec;
begin
надо что-то типа (утрированно)
ArrayValues := AValues;
end;

← →
han_malign © (2004-03-26 17:11) [7]

>ArrayValues : array of TVarRec;
- не помню пройдет ли в открытый массив - динамический, пробовать нужно. А так тоже самое, только SetLength(ArrayValues, Length(Avalues)) не забыть.

← →
D Purple (2004-03-26 17:14) [8]

Можешь написать примерчик, а то уже голова не соображает :)
Заранее благодарен!

я сегодня добрый:
procedure ImportKSIPData(AValues : array of string); var ArrayValues : array of TVarRec; begin SetLength(ArrayValues,Length(aValues)); for i:=0 to High(AValues)do begin ArrayValues[i].VType:=vtAnsiString; ArrayValues[i].VPointer:=Pointer(aArr[i]); end; ............... end;
- найди десять отличий называется

← →
D Purple (2004-03-26 17:34) [10]

огромное спасибо!!!

>D Purple (26.03.04 16:40)

как заполнить Array of const массивом array of string или присвоить каким либо образом

Никак.

как заполнить Array of const массивом array of string или присвои Найти похожие ветки