Помогите написать интерфейс для формы

Alexey · Сообщение **Alexey** » 15 мар 2006, 12:31

Нужно сделать форму справки (в frm ), примерно такого содержания:
1. ФИО;
2. Подразделение;
3. Дата увольнения;
4. Средний заработок за последние три месяца до увольнения(числом и прописью);
5. Количество отработанных недель за последние 12 месяцев перед увольнением;
и ещё несколько не существенных пунктов.
Проблема в том, что мне нужно в форму данные (номер сотрудника например или ФИО) из интерфейса направить. Помогите написать интерфейс.

san · Сообщение **san** » 15 мар 2006, 12:38

5 баксов

Алексей

1. Интерфейс.
2. Форма прототип, которую наполняешь из интерфейса.
3. Линк-форма.

А вы хотите что бы за Вас с нуля что ли написали? Вы бы хоть пример привели того, что уже сделали. Это ведь ФОРУМ а не биржа труда...

Maverick · Сообщение **Maverick** » 15 мар 2006, 13:34

5 баксов

мелко плаваете )))

Max_Fin · Сообщение **Max_Fin** » 15 мар 2006, 22:24

Начинайте по порядку, а не ищите сразу готовое решение.

Интерфейс что должен содержать? Какие-то фильтры?
Если нет, может ARD подойдет.

Alexey · Сообщение **Alexey** » 16 мар 2006, 09:32

Если по порядку, то я только месяц как работаю с Галактикой.
Для компиляции интерфейсов у нас нет модуля на Support'e. Есть только VIP.EXE, да и то для него нет даже VIP.CFG.

На форуме я нашёл CFG, настроил, но RES - ки он не компилирует. В литературе которой мы располагаем то же ничего об этом нет.
Мне бы для начала отладить компилятор.
А там я уже разберусь, описание языка vip есть.

Alexey · Сообщение **Alexey** » 16 мар 2006, 09:45

Вот пример vip.cfg который я спользую.

Код: Выделить всё

#include C:\test_elprom\EXE\COLOR.CFG
[DataBase]  DataBaseName=Test_Elprom
DataBaseDriver=MS70DRV.DLL 
TempTableInMem = off
UserTableInMem = off

DictionaryDirectory=C:\GAL573\DATA\dict

[System]
EditorFileMask=*.*
SavedInterfaceLayout=yes 
OpenResources=c:\test_elprom\exe\*.res

[Compilers]  
OutputResourceName=C:\test_elprom\MY_RES\OUTPUT\002_K.res 
   WriteToResource=yes 
   WriteDebugInfo=on 
   WriteListing=on 
   ErrorLevel=2 
   Make=On 
   IncludesPath=.\ 
   IncludesPath=c:\source 
   ClearResource=Off 

/resources=C:\test_elprom\EXE\G_vip.res
/resources=C:\test_elprom\exe\user.res
/resources=C:\test_elprom\exe\extfun.res
/resources=C:\test_elprom\exe\*.res

  [SQLDriver]
SQLServer=172.16.44.11

  
[DeskTop]  
   EnableHeapView=Off

   EnableHelpLine=Off
   LoadDesktopLayout=Off
   SaveDesktopLayout=Off

   [Screen]     Mode=Co80

   RunScreenSaverInterval=1

[LicParam] 
   LicFileName=C:\test_elprom\MY_RES\SUPPORT.LIC

Из-за чего может быть что vip не компилирует res. Может это из-за лицензии, но тогда какой файл лицензии мне подключать???

Алексей

Начиная с версии 5.85.02 необходима лицензия на компилятор.
Должен быть в файле лицензии саппорта - секция называется BILMENU
Если её нет, у вас не создастся RES файл.

Нужна лицензия.

san · Сообщение **san** » 16 мар 2006, 10:44

конфиг какой то придурошный, куча параметров которые к випу отношения не имеют, ключ не прописан, врятли с таким конфигом можно что то скомпилить.

san · Сообщение **san** » 16 мар 2006, 10:52

[DataBase]
DataBaseName=Test_Elprom
DataBaseDriver=MS70DRV.DLL

[SQLDriver]
SQLServer=172.16.44.11

[LicParam]
LicFileName=C:\test_elprom\MY_RES\SUPPORT.LIC
[HardwareKey]
SharedPath=\\key_server\KEYSERV\EXCHANGE

/resources=C:\test_elprom\EXE\g_oper.res;
/resources=C:\test_elprom\exe\extfun.res

Max_Fin · Сообщение **Max_Fin** » 16 мар 2006, 14:31

san писал(а):[DataBase]
/resources=C:\test_elprom\EXE\g_oper.res;
/resources=C:\test_elprom\exe\extfun.res

Лучше подключать все
/resources=C:\test_elprom\EXE\*.res

не ищите ускорения, там где его нет

Alexey писал(а):Из-за чего может быть что vip не компилирует res

Гляньте предложение от Алексея про лицензию (именно от support!), скорее всего ее у Вас нет.

KATZ · Сообщение **KATZ** » 16 мар 2006, 16:38

Max_Fin писал(а):Лучше подключать все
/resources=C:\test_elprom\EXE\*.res

Не лучше. При таком синтаксисе порядок подключения файлов непредсказуем, а должна быть вполне определенная последовательность (ZarFix1 после Zar, ZarFix2 после ZarFix1 и т. д.).

Алексей

Согласен с KATZ
У меня было так что прототип был в двух ресурсах, а комплиил я пачку ФРМом... и подключены ресурсы были не в той последовательности, т.е. подключенный позже ресурс имел более древнюю версию прототипа, как результат, "Не совпадение линкформы и прототипа".

Поменял их местами - получилось.

К чему подключать лишние ресурсы? Я кроме extfun подключаю ресы только когда собираю фрм-ки. И то смотрю какой res нужен, а не все подряд...

Ускорения может быть и нет, но как в анекдоте "непорядочек"

Alexey · Сообщение **Alexey** » 17 мар 2006, 09:08

Должен быть в файле лицензии саппорта - секция называется BILMENU

Это пример моего LIC файла, только без цифр. Где ту BILMENU меню и есть ли оно тут вообще???

Код: Выделить всё

Версия файла лицензий : Х
Название организации  : ХХХХХ
Дата приостановки абонентского обслуживания : 31/01/2006
Номер лицензии : Х
Список доступных контуров { 
  ST_ALONE
   ADMCONSOLEMENU
   ARDMAIN
   ARMRESOURCE
   CORPOSERVER
   FCENVMAIN
   IMEXMAIN
   JOURNALMENU
   PROTECTMENU
   SQLMAIN
}
Список доступных платформ {
   MSSQLSERVER
   OTHERREGIONS
}
Список атрибутов {
}
Серийный номер 1 аппаратного ключа : ХХХХХХХ
Серийный номер 2 аппаратного ключа : ХХХХХХХ
Серийный номер 3 аппаратного ключа : ХХХХХХХ
Серийный номер 4 аппаратного ключа : ХХХХХХХ
Серийный номер 5 аппаратного ключа : ХХХХХХХ
Дополнительная информация 1 : ХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХ
ХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХ
ХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХ
ХХХХХХХХХХХХХХХХХХХХХХХ
Дополнительная информация 2 : ХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХ
ХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХ
ХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХХ
ХХХХХХХХХХХХХХХХХХХХХХХ
Идентификатор клиента (первая часть) : ХХХХ
Идентификатор клиента (вторая часть) : ХХХХ
Пароль 1 для аппаратного ключа : ХХХХ
Пароль 2 для аппаратного ключа : ХХХХХХХХ
Код лицензии (первая часть) : ХХХХХХХХ
Код лицензии (вторая часть) : ХХХХХХХХ
Контрольная сумма : ХХХХХХХХ

Лицензя от нашего суппорта, на суппорте нет контура компилятора вип интерфейсов, означает ли это, что у нас не будет компилировать ресурсники и VIP.EXE ???

Max_Fin · Сообщение **Max_Fin** » 17 мар 2006, 09:10

Ну подловили, подловили.
Не подключаю я так патчи. Есть общий для всех cfg, который используется у меня для всех сборок
Отсюда Ваш вариант тоже ущербен правильно вести так

// порядок подключения патчей - на основе файла galres.pas из common03
// 1. 'Plan'
// 2. 'Proizv'
// 3. 'Staff'
// 4. 'Zar'
// 5. 'ZarExt'
// 6. 'Buh'
// 7. 'Txo'
// 8. 'Kau'
// 9. 'Fin'
// 10. 'SFO'
// 11. 'OS'
// 12. 'KBU'
// 13. 'Nalog'
// 14. 'Sklad'
// 15. 'Remont'
// 16. 'Oper'
// 17. 'XlsRep'
// 18. 'Common'
// 19. 'GalMenu'
// 20. 'Gal'

// [ 1 ]
/resources:%vipRooT%\GalRes\%verCode%\plan\plan02\*.res
/resources:%vipRooT%\GalRes\%verCode%\plan\plan02\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\plan\plan02\fix02\*.res
/resources:%vipRooT%\GalRes\%verCode%\plan\plan02\fix03\*.res
/resources:%vipRooT%\GalRes\%verCode%\plan\plan02\fix04\*.res
/resources:%vipRooT%\GalRes\%verCode%\plan\plan02\fix05\*.res

// [ 2 ]
/resources:%vipRooT%\GalRes\%verCode%\proiZv\pro02\*.res
/resources:%vipRooT%\GalRes\%verCode%\proiZv\pro02\fix01\*.res

// [ 4 ]
/resources:%vipRooT%\GalRes\%verCode%\zar\zar11\*.res
/resources:%vipRooT%\GalRes\%verCode%\zar\zar11\fix01\*.res

// [ 6 ]
/resources:%vipRooT%\GalRes\%verCode%\buH\buh06\*.res
/resources:%vipRooT%\GalRes\%verCode%\buH\buh06\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\buH\buh06\fix02\*.res
/resources:%vipRooT%\GalRes\%verCode%\buH\buh06\fix03\*.res

// [ 7 ]
/resources:%vipRooT%\GalRes\%verCode%\tXo\txo03\*.res
/resources:%vipRooT%\GalRes\%verCode%\tXo\txo03\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\tXo\txo03\fix02\*.res
/resources:%vipRooT%\GalRes\%verCode%\tXo\txo03\fix03\*.res

// [ 8 ]
/resources:%vipRooT%\GalRes\%verCode%\kaU\kau03\*.res

// [ 9 ]
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\*.res
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\fix02\*.res
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\fix03\*.res
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\fix04\*.res
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\fix05\*.res
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\fix06\*.res
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\fix07\*.res
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\fix08\*.res
/resources:%vipRooT%\GalRes\%verCode%\fin\fin02\fix09\*.res

// [ 10 ]
/resources:%vipRooT%\GalRes\%verCode%\sfo\sfo02\*.res
/resources:%vipRooT%\GalRes\%verCode%\sfo\sfo02\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\sfo\sfo02\fix02\*.res

// [ 11 ]
/resources:%vipRooT%\GalRes\%verCode%\os\os03\*.res

// [ 12 ]
/resources:%vipRooT%\GalRes\%verCode%\kbu\kbu03\*.res
/resources:%vipRooT%\GalRes\%verCode%\kbu\kbu03\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\kbu\kbu03\fix02\*.res
/resources:%vipRooT%\GalRes\%verCode%\kbu\kbu03\fix03\*.res
/resources:%vipRooT%\GalRes\%verCode%\kbu\kbu03\fix04\*.res
/resources:%vipRooT%\GalRes\%verCode%\kbu\kbu03\fix05\*.res
/resources:%vipRooT%\GalRes\%verCode%\kbu\kbu03\fix06\*.res
/resources:%vipRooT%\GalRes\%verCode%\kbu\kbu03\fix07\*.res

// [ 13 ]
/resources:%vipRooT%\GalRes\%verCode%\nalog\nalog01\*.res
/resources:%vipRooT%\GalRes\%verCode%\nalog\nalog02\*.res

// [ 14 ]
/resources:%vipRooT%\GalRes\%verCode%\sklad\sklad02\*.res
/resources:%vipRooT%\GalRes\%verCode%\sklad\sklad02\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\sklad\sklad02\fix02\*.res
/resources:%vipRooT%\GalRes\%verCode%\sklad\sklad02\fix03\*.res
/resources:%vipRooT%\GalRes\%verCode%\sklad\sklad02\fix04\*.res

// [ 15 ]
/resources:%vipRooT%\GalRes\%verCode%\remont\rem03\*.res
/resources:%vipRooT%\GalRes\%verCode%\remont\rem03\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\remont\rem03\fix02\*.res

// [ 16 ]
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\*.res
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\fix02\*.res
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\fix03\*.res
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\fix04\*.res
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\fix05\*.res
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\fix06\*.res
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\fix07\*.res
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\fix08\*.res
/resources:%vipRooT%\GalRes\%verCode%\oper\oper02\fix09\*.res

// [ 17 ]
/resources:%vipRooT%\GalRes\%verCode%\xlsrep\xlsrep02\*.res

// [ 18 ]
/resources:%vipRooT%\GalRes\%verCode%\common\comm07\*.res
/resources:%vipRooT%\GalRes\%verCode%\common\comm07\fix01\*.res
/resources:%vipRooT%\GalRes\%verCode%\common\comm07\fix02\*.res
/resources:%vipRooT%\GalRes\%verCode%\common\comm07\fix04\*.res

// [ 19 ]
/resources:%vipRooT%\GalRes\%verCode%\galmnu\gmnu11\*.res

// [ ? ]
/resources:%vipRooT%\GalRes\%verCode%\galhlp\ghlp02\*.res
/resources:%vipRooT%\GalRes\%verCode%\galsys\gsys05\*.res