![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
![]() Доброе время суток!
Может это уже где то разбиралось но я что-то не нашла... Такая проблемка. вообщем у меня есть программа в ней кнопки ToolButton к которые открывают различные екзешники. так вот мне надо редактировать свою программу т.е название кнопки и ссылку на екзешник через ini файл вот как это сделать? как создать файл и как прописать в него названия кнопок я понила а как ссылки прописать? |
#2
|
|||
|
|||
![]() Цитата:
А разница в чем строка она и есть строка. Delphi - это лишь инструмент, а что ты сможешь создать при помощи этого инструмента, зависит исключительно от тебя. |
#3
|
|||
|
|||
![]() вот у меня процедура
procedure TForm1.ToolButton1Click(Sender: TObject); begin shellExecute(application.Handle,'open','C:\1\1.exe ', nil,nil,SW_SHOW); end; как мне такое считать с ини файла т.е что бы я могла в ини менять путь exe файлу |
#4
|
|||
|
|||
![]() Код:
procedure TForm1.ToolButton1Click(Sender: TObject); begin shellExecute(application.Handle,'open','C:\1\1.exe ', nil,nil,SW_SHOW); end; на Код:
procedure TForm1.ToolButton1Click(Sender: TObject); var s: string; begin // тут присваиваем переменной s строку из ини файла shellExecute(application.Handle,'open',s, nil,nil,SW_SHOW); end; Delphi - это лишь инструмент, а что ты сможешь создать при помощи этого инструмента, зависит исключительно от тебя. |
#5
|
|||
|
|||
![]() не то...
вот подругому тут я описываю ини файл в котором будет возможность менять название кнопки toolbutton1.Caption:=inifile.ReadString('ButtonCap tion','Button1', 'Name'); Вот как мне в делфи описать ини вот такой процедуры shellExecute(Application.Handle,'open','C:\1\1.exe ',nil,nil,SW_SHOW); ??? |
#6
|
|||
|
|||
![]() Цитата:
Код:
procedure ExtractParhForIni; var IniFile : TIniFile; Str : String; begin IniFile := TIniFile.Create(settings.ini); s := readstring('Exeute','Execute1','notepad.exe'); // тут присваеиваем строке s данные из ini файла shellExecute(Application.Handle,'open',s,nil,nil,SW_SHOW); inifile.free; end; ini фаил Код:
[Exeute] Execute1=C:\1\1.exe Delphi - это лишь инструмент, а что ты сможешь создать при помощи этого инструмента, зависит исключительно от тебя. |