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

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

Памогите перевести такой код из Basic в Delfi [D7, Win95/98]


Хрюндель ©   (2005-08-04 16:43:00) 

Range("A8").Select
   ActiveCell.FormulaR1C1 = "end item"
   Range("A3").Select
   Cells.Find(What:="end item", After:=ActiveCell, LookIn:=xlFormulas, _
       LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
       MatchCase:=False, SearchFormat:=False).Activate


Digitman   (2005-08-04 17:00:00) [1]


> Хрюндель   (04.08.05 16:53) [6]



> нада найти в одном столбце значение


дык ыть никто ничего против и не имеет !

раз Ёхель это умеет делать, значит и в Делфи-приложении его, Ёхель, сие сделать заставить можно  ..

открываешь ЁхельХХХХ_tlb.pas и смотришь как декларированы параметры ф-ции ... предположим , их там - косой десяток ...
ориентируешься по именам параметров в васик-коде и вместо неиспользуемых параметров в Делфи-коде подставляешь EmptyParam ...


Хрюндель   (2005-08-04 16:53:00) [2]

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


Digitman   (2005-08-04 16:50:00) [3]


> Хрюндель


ты бы похрюкал что ли для начала в ExcelXXXX_tlb.pas ..

Там есть чуть ли не все ответы на чуть ли не все твои вопросы на сию желудевую тему)


Джо   (2005-08-04 16:50:00) [4]


>  [3] Хрюндель   (04.08.05 16:49)
> А што такое Cells?

Ты его что, из Екселя выдрал? Так вот причем здесь Делфи?


Хрюндель   (2005-08-04 16:49:00) [5]

А што такое Cells?


isasa   (2005-08-04 16:48:00) [6]

А что Delphi "таким кодом" будет делать. Где объект применения усилий?


clickmaker   (2005-08-04 16:46:00) [7]

создаешь соответствующие ком-объекты
CreateOleObject('...')
в коде меняешь " на ', = на := и ; расставляешь везде в конце


Наверх

Титульная страница Поиск, карта сайта Написать письмо