Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2005.07.25;
Скачать: [xml.tar.bz2];

Вниз

Присвоение в вариантном многомерном массиве.   Найти похожие ветки 

 
Kacnep ©   (2005-07-04 07:45) [0]

Привет мастерам. Опишу свой вопрос на примере из хелпа к дельфи.
Дельфи 6.

Тут все норально и работает ...

var
  S: string;
  Mas: Variant;
begin
  Mas:= VarArrayCreate([0, 3], varVariant);
  Mas[0]:= VarArrayHighBound(Mas, 1);
  Mas[1]:= "Быть или не быть?";
  Mas[2]:= 12.34567;
  Mas[3]:= VarArrayOf( [7, 354, 0, 21, 66, 189] );
  S:= VarToStr( Mas[1] );       // S:= "Быть или не быть?"
  S:= VarToStr( Mas[3][1] );  // S := 354
end;

А вот теперь делаем наоборот иии :(((

Mas[3][1]:=45763; Ругается что не может присвоить
Тоже и с VarArrayPut(Mas[3],457663,[1])

Вопрос 1 как присвоить?
Вопрос 2 Могули присвоить не 45763 а строку "Не работает"
Спасибо заранее


 
VMcL ©   (2005-07-04 08:18) [1]

>>Kacnep ©   (04.07.05 07:45)

1.

Tmp := Mas[3];
Tmp[1] := 45763;
Mas[3] := Tmp;


2.
Да.


 
VMcL ©   (2005-07-04 08:20) [2]

P.S.
Tmp: Variant;


 
Kacnep ©   (2005-07-04 08:39) [3]

Спасибо
Это я проверил -это работает. Виноват что сразу не написал.
А почему напрямую не хотит?
Mas[3][1]:=45763; ведь чтение идет напрямую???



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

Форум: "Основная";
Текущий архив: 2005.07.25;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.011 c
3-1118394819
Andy Nortsov
2005-06-10 13:13
2005.07.25
Как правильно работать с ADO+ODBC+FireBird+Delphi?


14-1120464205
Тульский
2005-07-04 12:03
2005.07.25
Игровые автоматы


14-1120420388
ArMellon
2005-07-03 23:53
2005.07.25
php. форматирование строки


3-1118895406
Dron1173
2005-06-16 08:16
2005.07.25
SQL запрос


14-1120488797
Kerk
2005-07-04 18:53
2005.07.25
Вывод средств из WebMoney





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский