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

Вниз

Памогите перевести такой код из Basic в Delfi   Найти похожие ветки 

 
Хрюндель   (2005-08-04 16:43) [0]

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


 
clickmaker ©   (2005-08-04 16:46) [1]

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


 
isasa ©   (2005-08-04 16:48) [2]

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


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

А што такое Cells?


 
Digitman ©   (2005-08-04 16:50) [4]


> Хрюндель


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

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


 
Джо ©   (2005-08-04 16:50) [5]


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

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


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

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


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


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



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


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

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

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



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

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

Наверх




Память: 0.46 MB
Время: 0.036 c
3-1121337642
Ирина
2005-07-14 14:40
2005.08.28
SetField, AppendRecord


4-1121060219
NeoMaster
2005-07-11 09:36
2005.08.28
Синхронные и асинхронные запросы


3-1121755995
-=snoop=-
2005-07-19 10:53
2005.08.28
OnClick = Cheked в чекбоксе!??


3-1121768946
Sour
2005-07-19 14:29
2005.08.28
Подключение к MySQL


4-1120631827
syte_ser78
2005-07-06 10:37
2005.08.28
скандиск для памяти





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский