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

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

Скрыть button


Страницы:   1 2

Mariya ©   (2007-10-10 07:26:00) 

Подскажите, пожалуйста, у меня есть

if Sender is TMyButton then
 a:=ShellExecute(handle, nil, Pchar((Sender as TMyButton).Prog), NiL, NiL, SW_SHOWNORMAL);
 if a <>42 then
 MessageDlg('Такой программы не существует!', mtInformation, [mbOk], 0);
Смогла написать, что если нет екзешника, выдает об этом сообщение, а можно при создании формы (при запуске) как бы проверить имеются ли екзешники, которые в ини Prog=... написаны, если нет, то просто не создавать эту кнопку. Пыталась в онкриейт написать  if a <>42 then btn[i].Visible:=False; не верно.


Mariya   (2007-10-10 14:21:00) [1]


> Больно слышать

Может читать менее больно?


Игорь Шевченко   (2007-10-10 13:55:00) [2]


> Undeclared identifier 'IncludeTralingPathDelimiter'.


Больно слышать


Kolan   (2007-10-10 13:23:00) [3]

Когда начинешь что-то писать нажми Ctrl+Space появится подсказка(Code insite)


Kolan   (2007-10-10 13:22:00) [4]

> [30] Mariya   (10.10.07 13:17)
> Undeclared identifier 'IncludeTralingPathDelimiter'.

IncludeTra ilingPathDelimiter


Mariya   (2007-10-10 13:17:00) [5]

Undeclared identifier 'IncludeTralingPathDelimiter'.


Mariya   (2007-10-10 13:12:00) [6]

Удалено модератором


Игорь Шевченко   (2007-10-10 13:12:00) [7]

Mariya   (10.10.07 13:03) [26]

Обучение предполагает поиск педагога и оплату его усилий по вколачиванию требуемых знаний в пустую голову.

Читать наизусть до полного и окончательного просветления:
http://ln.com.ua/~openxs/articles/smart-questions-ru.html


Dib@zol   (2007-10-10 13:05:00) [8]

> Игорь это кто?
Осмелюсь предположить - который Шевченко?

> Вы же все уже взрослые,
Неправда.


Mariya   (2007-10-10 13:03:00) [9]


> НАЙМИТЕ УЖЕ ПРОГРАММИСТА!!!

Я пытаюсь им стать, Вы же все уже взрослые, имеете хороший опыт во всем это, а я около месяца назад начала изучать Дельфи, и то с Вашей помощью много чего мне стало понятно.  Может через пару лет буду как и Вы людям помогать...


Mariya   (2007-10-10 12:51:00) [10]


> бабки заплатили

ошибаетесь! :)
Игорь это кто?


Anatoly Podgoretsky   (2007-10-10 12:20:00) [11]

> Kolan  (10.10.2007 11:35:23)  [23]

Ну ей же нужен результат. За это время ей уже такие бабки заплатили, Игорь бы дешевле обошелся.


Kolan   (2007-10-10 11:35:00) [12]

> Мария найми Игоря на работу

Из пушки по воробьям :)


Anatoly Podgoretsky   (2007-10-10 11:34:00) [13]

Взлетит, не взлетит?

Мария найми Игоря на работу, конечно дорого, но и результат будет.


clickmaker   (2007-10-10 11:24:00) [14]


> [18] ASoft   (10.10.07 10:32)
> ну, все, хана.. Маша сейчас в реестр полезет-)))

или утонет, или плавать научится )


Leonid Troyanovsky   (2007-10-10 11:17:00) [15]


> Игорь Шевченко ©   (10.10.07 10:40) [19]

> НАЙМИТЕ УЖЕ ПРОГРАММИСТА!!!

Не поможет :)
С консерваторией там чего-то не то,
около десятка уже, похоже, сбежали.

Ну, а задание просто генеральское: вместо того,
чтобы вытянуть на стол (меню) десяток ярлыков -
подать сюда навигатор, не менее.

--
Regards, LVT.


Игорь Шевченко   (2007-10-10 10:40:00) [16]

НАЙМИТЕ УЖЕ ПРОГРАММИСТА!!!


ASoft   (2007-10-10 10:32:00) [17]

ну, все, хана.. Маша сейчас в реестр полезет-)))


clickmaker   (2007-10-10 10:28:00) [18]


> [15] Mariya   (10.10.07 10:22)


как вариант, но не на все случаи

var
  Reg: TRegistry;

 Reg := TRegistry.Create(KEY_READ);
 try
    Reg.RootKey := 'HKEY_LOCAL_MACHINE';
    if Reg.KeyExists('SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths' + ExeName) then
      // существует
  finally
    Reg.Free;
  end;


Leonid Troyanovsky   (2007-10-10 10:27:00) [19]


> Mariya   (10.10.07 10:22) [15]

> Не обязательно в програм файлс, может лежать в любом месте
> на жестком диске, в любой папке

Ну, и славно.
Файлы конфигурации на то и даны, чтобы настраивать, в том числе,
пути поиска, имена файлов и т.д.

--
Regards, LVT.


Mariya   (2007-10-10 10:22:00) [20]

Не обязательно в програм файлс, может лежать в любом месте на жестком диске, в любой папке


Страницы:   1 2

Наверх

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