| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Скажите как юзать параметр FieldInfo в методе OpenText [Delphi, Windows]

TankMan ©   (2005-05-06 07:56:00) 

что используется в компоненте TExcelApplication...
А конкретно хотелось бы узнать, как заполнять и объявлять такой вот параметр, в VBA показывает что это (FieldInfo) массив массивов... но ведь это variant...

---

TankMan   (2005-05-13 12:34:00) [1]

Получилось - работает

---

YurikGL   (2005-05-13 09:05:00) [2]

> TankMan ©   (13.05.05 08:57) [8]

Вообще-то из хелпа :)

---

TankMan   (2005-05-13 08:57:00) [3]

Ух ты, никогда такой конструкции не видал :)
Попробую, по виду - это то что нужно
Спасибо большое!

---

YurikGL   (2005-05-12 21:57:00) [4]

может поможет

var

 A: Variant;
begin
 A := VarArrayCreate([0, 4], varVariant);
 A[0] := 1;
 A[1] := 1234.5678;
 A[2] := 'Hello world';
 A[3] := True;
 A[4] := VarArrayOf([1, 10, 100, 1000]);
 WriteLn(A[2]); { Hello world }
 WriteLn(A[4][2]); { 100 }

end;

---

TankMan   (2005-05-12 14:34:00) [5]

Да это я и сам знаю, я спрашиваю КАК? Я не знаю как это реализовать, не помню в упор - наш учитель помниться говорил - "Дети вариант вообще бесполезный тип данных, очень опасный, лучше его не использовать,бла бла бла..." а далее его повествование о типе Variant заканчивалось, и он с увлечением продолжал рассказывать про string integer longint и т.д. :(, потому и спрашиваю КАК?

---

YurikGL   (2005-05-11 09:37:00) [6]

Попробуй трехмерный массив

---

TankMan   (2005-05-11 07:20:00) [7]

Да какая разница? Ну вот например такой вот:
Workbooks.OpenText Filename:="C:\1\01\08.TXT", Origin:=866, _
       StartRow:=1, DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, _
       ConsecutiveDelimiter:=True, Tab:=False, Semicolon:=False, Comma:=False _
       , Space:=True, Other:=False, FieldInfo:=Array(Array(1, 2), Array(2, 2), Array _
       (3, 2), Array(4, 2), Array(5, 2), Array(6, 2), Array(7, 2)), TrailingMinusNumbers:= _
       True

---

YurikGL   (2005-05-10 21:18:00) [8]

> TankMan ©   (10.05.05 06:29) [2]

Приведи макрос...

---

TankMan   (2005-05-10 06:29:00) [9]

Я прикрасно понимаю, что это вАриант, и что вАриант - может хранить любой формат данных, но КАК?
Мне нужно открыть файл opentext, там хранятся данные и инвентарные номера, некоторые теряют нули, мне хотелось бы сразу указать что это текст...

---

YurikGL   (2005-05-06 09:19:00) [10]

Переменной типа variant можно присвоить все что угодно.
Ты лучше скажи зачем тебе это надо.

---

Наверх