Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / 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; не верно.

Leonid Troyanovsky (2007-10-10 10:10:00) [21]

> Kolan © (10.10.07 10:00) [13]

> Eсли предположить, kkk.exe

Если предположить, что это exe, то проверять надо FindExecutable.

--
Regards, LVT.

Kolan (2007-10-10 10:00:00) [22]
Eсли предположить, kkk.exe лежит в ProgramFiles, то:

FileExists(IncludeTralingPathDelimiter(GetEnvironmentVariable('ProgramFile s'))+IncludeTralingPathDelimiter( kkk)+ kkk.exe)
Жирным выделено то, что надо подставить…

Mariya (2007-10-10 09:57:00) [23]
Ini.ReadString('Prog', 'Prog1', ' ') к этому можно применить FileExists?

Kolan (2007-10-10 09:54:00) [24]
> Подскажите как мне в дельфи обратиться к записи в ини-файле

Ты издеваешься? Как то же ты их раньше загружала?…

Mariya (2007-10-10 09:52:00) [25]
Подскажите как мне в дельфи обратиться к записи в ини-файле, конкретно к kkk.exe чтобы проверить существует ли ОНО?
[Prog]
Prog1= kkk.exe
Prog2=ddd.exe

Leonid Troyanovsky (2007-10-10 09:45:00) [26]

> Kolan © (10.10.07 09:40) [7]

> Ой ненадо, мы тут только с кнопками развязались, шас начнётся

Хе-хе, развязались:
показывать - показали,
а скрыть - скрыли.

--
Regards, LVT.

Kolan (2007-10-10 09:40:00) [27]
вместо подставьте нужные имена…

Kolan (2007-10-10 09:40:00) [28]
> Leonid Troyanovsky © (10.10.07 09:20)

Ой ненадо, мы тут только с кнопками развязались, шас начнётся новая волна…

установлены базы … у него нет доступа … нет екзешников
Открою страшную тайну — экзешники — это не базы данных!

если установлены,…, если не установлены
Проверяйте существование файла FileExists. если ваши «базы» установлены в ProgramFiles, то добраться до них можно так:

IncludeTralingPathDelimiter(GetEnvironmentVariable('ProgramFiles'))+IncludeTralingPathDelimiter(Папака с «Базой»>)+

Leonid Troyanovsky (2007-10-10 09:35:00) [29]

> Mariya (10.10.07 09:27) [5]

> то эти кнопки не создавать вообще, чтобы юзер какбы даже
> не знал, что существуют другие базы.

Дались тебе эти кнопки.
Если в листбоксе нет строки, то про нее никто и не узнает.

--
Regards, LVT.

Mariya (2007-10-10 09:27:00) [30]
Здесь немного не так. Есть форма, на ней должны быть кнопки с названиями баз данных, есть 10 юзеров, доступ к базам у всех разный (юзер1 например имеет доступ к 8 из 10 баз) так вот, и у него (каждого) получается установлены базы, к которые он может открывать, а к которым у него нет доступа, они не устанолены, нет екзешников. Получается мне нужно, при создании формы (типа программы навигатора), проверить установлены ли программы (есть ли екзешники), которые перечислены в ини-файле (там перечислены все базы), если установлены, то создать кнопки с названием этих баз, если не установлены, то эти кнопки не создавать вообще, чтобы юзер какбы даже не знал, что существуют другие базы.

Leonid Troyanovsky (2007-10-10 09:20:00) [31]

> Mariya (10.10.07 07:26)

> написаны, если нет, то просто не создавать эту кнопку

Создавать кнопку не надо, достаточно одной на форме.
А надо из ini заполнить, например, TListBox (один)
именами исполняемых файлов.
При нажатии на кнопку пускаем выбранное приложение
with Listbox do WinExec(PChar(Items[ItemIndex]), SW_SHOW).

Можно и без кнопки, на ListBox.On{Dbl}Click

--
Regards, LVT.

ASoft (2007-10-10 08:58:00) [32]
существует ли такой екзешник, указанный в ini

Mariya (2007-10-10 08:56:00) [33]

> ini..[prg] Prog=программа.exe* существует

можно подробнее? это мы проверяем есть ли такая запись в ини? или существует ли такой екзешник?

ASoft (2007-10-10 07:49:00) [34]
в oncreate:
если *ini..[prg] Prog=программа.exe* существует, то создать кнопку (создавать кнопки вы кажется научились:-))
беспредел какой-то, имхо....%)

Страницы: < 1 2

Наверх

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