На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! user posted image
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.

Соблюдайте общие правила форума

Следующие вопросы задаются очень часто, подробно разобраны в FAQ и, поэтому, будут безжалостно удаляться:
1. Преобразовать переменную типа String в тип PChar (PAnsiChar)
2. Как "свернуть" программу в трей.
3. Как "скрыться" от Ctrl + Alt + Del (заблокировать их и т.п.)
4. Как запустить программу/файл? (и дождаться ее завершения)
5. Как перехватить API-функции, поставить hook? (перехват сообщений от мыши, клавиатуры - внедрение в удаленное адресное прстранство)
... (продолжение следует) ...

Внимание:
Попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки - бан.
Мат в разделе - бан на три месяца...

Полезные ссылки:
user posted image MSDN Library user posted image FAQ раздела user posted image Поиск по разделу user posted image Как правильно задавать вопросы


Выразить свое отношение к модераторам раздела можно здесь: user posted image Rouse_, user posted image Krid

Модераторы: Rouse_, Krid
  
> Поиск в Excel нужной строки
    Люди подскажите код для поиска строки в Excel. Допустим у меня строка OrgName содержит имя организации и я ее сравниваю со строками в Excel и если совпадение есть, то нужно показать эту строку в Excel. :wall:
      Берем переменную Excel из предыдущего твоего топика:
      ExpandedWrap disabled
         try
          Excel.Cells.Find(OrgName).Select;
         except
         
         end;

      Если ячейка с текстом OrgName найдена, то она будет выделена, если нет - возникнет исключение, поэтому заключаем поиск в try ... except.
      Вообще, у Find еще много необязательных параметров, если не хватит задания только текста:
      ExpandedWrap disabled
        Cells.Find(What, After, LookIn, LookAt, SearchOrder, SearchDirection, MatchCase, SearchFormat)
        А как можно найти значение по пересечению двух строки и столбца и потом записатьв Edit ?
        пробую SearchOrder не получаеться может я не правильно делаю ?
        SearchOrder('начало', 'момент', Edit1.text)
        Сообщение отредактировано: nqwe -
        0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
        0 пользователей:


        Рейтинг@Mail.ru
        [ Script execution time: 0,0258 ]   [ 16 queries used ]   [ Generated: 18.08.25, 01:57 GMT ]