Посл.ответ |
Сообщение |
Ранг: 105.9 (ветеран), 1thx Активность: 0.09↘0 Статус: Участник
|
Создано: 08 августа 2007 10:18 · Личное сообщение · #1
Подскажите каким образом можно редактировать интерфейс программ на Дельфи. Есть программка (простенькая оболочка для диска с софтом), я хотел ее переделать на собственные нужды. Убрать некоторые кнопки и т.д.
Ресторатор и другие редакторы ресурсов показывают интерфейс главного окна в виде RCData такого плана:
object Form1: TForm1
Left = 151
Top = 169
BorderStyle = bsNone
Caption = 'Form1'
ClientHeight = 549
ClientWidth = 765
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyPreview = True
OldCreateOrder = False
Scaled = False
Visible = True
OnActivate = FormActivate
OnCreate = FormCreate
OnKeyPress = Edit1KeyPress
PixelsPerInch = 120
TextHeight = 16
object PlasmaForm1: TPlasmaForm
Left = 0
Top = 29
Width = 765
Height = 520
Align = alClient
AutoSize = True
Picture.Data = {07544269746D617000000000}
Mask.Data = {00000000}
Moveable = True
end
object close_but: TEzRgnBtn
Left = 660
Top = 26
Width = 18
Height = 18
Enabled = True
PicIdle.Data = {
07544269746D617026040000424D260400000000000036000000280000001200
......................................................................
BDD3BFBDD2BFBDD2BFBDAC8A864A0D070000}
PaintMode = pmNormal
OnClick = close_butClick
end
object max_but: TEzRgnBtn
Left = 635
Top = 26
Width = 18
Height = 18
Enabled = True
PicIdle.Data = {
07544269746D617026040000424D260400000000000036000000280000001200
...................................................................
BDD3BFBDD2BFBDD2BFBDAC8A86480D070000}
PaintMode = pmNormal
OnClick = max_butClick
end
object ScrollBox1: TScrollBox
Left = 45
Top = 107
Width = 612
Height = 382
TabOrder = 3
object wb: TFrameViewer
Left = 0
Top = 0
Width = 608
Height = 378
Cursor = 2
OnHotSpotTargetClick = wbHotSpotTargetClick
OnHistoryChange = wbHistoryChange
NoSelect = False
PrintMarginLeft = 2
PrintMarginRight = 2
PrintMarginTop = 2
PrintMarginBottom = 2
DefFontName = 'Times New Roman'
DefPreFontName = 'Courier New'
HistoryMaxCount = 12
CharSet = DEFAULT_CHARSET
Align = alClient
PopupMenu = PopupMenu1
TabOrder = 0
fvOptions = [fvNoBorder, fvPrintTableBackground]
end
end
object but1: TEzRgnBtn
Left = 205
Top = 80
Width = 111
Height = 18
Enabled = True
PicIdle.Data = {
07544269746D6170D6170000424DD61700000000000036000000280000006F00
...................................................................
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFEFEFEEDDFE800
0000}
PaintMode = pmCrop
OnClick = buttonsclick
end
и т.д. Пробовал просто удалять описание объектов. После этого программа падает с ошибкой. Пробовал в свойствах кнопок Width и Height прописывать равными нулю. Прога падает с ошибкой. То есть правитьдельфовые формы редактором ресурсов нельзя? А как тогда?
| Сообщение посчитали полезным: |
|
Ранг: 81.5 (постоянный), 5thx Активность: 0.08↘0 Статус: Участник
|
Создано: 08 августа 2007 10:58 · Личное сообщение · #2
Используй тулзы для русификации - они коректно показывают интерфейс делфи. Проги есть такие Multilizer, Sisulizer, Passolo, Radialix Localizer и т.д.
| Сообщение посчитали полезным: |
Ранг: 68.8 (постоянный) Активность: 0.12↘0 Статус: Участник
|
Создано: 08 августа 2007 11:51 · Личное сообщение · #3
Sturgeon
Что, диск у Бэдгая приобрёл и названия софта не влазят в форму?
| Сообщение посчитали полезным: |
 Ранг: 756.3 (! !), 113thx Активность: 0.61↘0.05 Статус: Участник Student
|
Создано: 08 августа 2007 13:13 · Личное сообщение · #4
Sturgeon пишет:
Пробовал просто удалять описание объектов.
Добавь ненужным объектам Visible = False
----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh | Сообщение посчитали полезным: |
Ранг: 105.9 (ветеран), 1thx Активность: 0.09↘0 Статус: Участник
|
Создано: 08 августа 2007 13:55 · Личное сообщение · #5
bash пишет:
Что, диск у Бэдгая приобрёл
Что у нас ковырять больше нечего, кроме пластинок от Плохиша? У него, кстати, исходники прилагаются.
deepred
Sisulizer отлично справился. Спасибо! Чего то я привык ресторатором пользоваться, а такого "продвинутого " софта у меня и не стояло даже. Ну, вроде разрулил.
| Сообщение посчитали полезным: |
Ранг: 95.5 (постоянный), 36thx Активность: 0.08↘0.04 Статус: Участник
|
Создано: 13 августа 2007 14:58 · Поправил: Rio · Личное сообщение · #6
Isaev прав насчёт visible, то что тебе не нужно не будет видно.
С Уважнием Rio.
ps если есть вопросы по программированию пиши в личку, а лучше посмотри англо-русский словарь.
| Сообщение посчитали полезным: |
 Ранг: 756.3 (! !), 113thx Активность: 0.61↘0.05 Статус: Участник Student
|
Создано: 13 августа 2007 15:37 · Личное сообщение · #7
Нашёл тут --> Delphi Form Editor <-- http://www.mitec.cz/dfm.html . Попробуй им.
----- z+Dw7uLu5+jqLCDq7vLu8PvpIPHs7uMh | Сообщение посчитали полезным: |
Ранг: 105.9 (ветеран), 1thx Активность: 0.09↘0 Статус: Участник
|
Создано: 13 августа 2007 23:34 · Личное сообщение · #8
Isaev пишет:
Delphi Form Editor
Это вроде для DFM? А мне надо было бинарник поправить. В Delphi Form Editor такое вроде нельзя сделать?
| Сообщение посчитали полезным: |
Ранг: 68.8 (постоянный) Активность: 0.12↘0 Статус: Участник
|
Создано: 14 августа 2007 01:06 · Личное сообщение · #9
Sturgeon пишет:
То есть правитьдельфовые формы редактором ресурсов нельзя?
Править можно, НО зависит от компилятора как он завязал код той проги с её ресурсами - отсюда и падения проги при вмешательстве. Думаю стоит попробовать много разных редакторов ресурсов, а Delphi Form Editor использовать как вспомогательную для более лёгкого разбора RCData
| Сообщение посчитали полезным: |