Предлагаю вот какую концепцию, так называемых инклуд. Берём в пример
Add(FormatStr,3536514,441,315)
{
}
[[Имя параметра|Имя ini]]
Например - [[Caption|Label.ini]] Таким образом данные из свойства попадут в pas, или в нашем случае txt. Чем то напоминает wiki синтаксис. Итак, у кажого исполняемого файла для телефона (jar) есть файл с информацией,- jad. если его нет, то он автоматически генерируется телефоном из jar файла. Вот пример jad файла:
MIDlet-1: NewProject, /icon.png, FW
MIDlet-Jar-Size: 2816
MIDlet-Jar-URL: NewProject.jar
MIDlet-Name: NewProject
MIDlet-Vendor: MIDletPascal
MIDlet-Icon: /icon.png
MIDlet-Version: 1.0.0
MicroEdition-Configuration: CLDC-1.0
MicroEdition-Profile: MIDP-1.0
Это, как говорится то, что мы ждолжны получить на выходе. Но откуд абрать все эти данные? Из ini.
JAD.ini писал(а):
[About]
Version=1.0
Autor=Astramak
[Type]
Class=JadElement
Info=Ядро
[Property]
MidletName=Имя мидлета|2|NewMidlet
MidletVersion=Версия мидлета|2|1.0.0.0
MidletIcon=Иконка мидлета|6|
MidletType=Тип мидлета|4|0|Classic Midlet,MIDP2.0 Fullscreen,NokiaAPI Fullscreen
MIDPVersion=Версия ядра|4|0|MIDP1.0,MIDP2.0
И всоввываем их в pas (jad.pas на данном этапе один с таким расширением, все остальные - txt, компоненты)
JAD.pas писал(а):
Start
MidletIcon=Path;
Size=SizeofJAR;
URL=[[MidletName]].jar;
MidletType=Classic Midlet-CLDC-1.0+MIDP2.0 Fullscreen-MIDP2.0+NokiaAPI Fullscreen-NokiaAPI;
end.
Begin
MIDlet-1: [[MidletName|JAD.ini]], [[MidletIcon|JAD.ini]], FW
MIDlet-Jar-Size: [[Size|JAD.ini]]
MIDlet-Jar-URL: [[URL]]
MIDlet-Name: [[MidletName|JAD.ini]]
MIDlet-Vendor: HiAsm Mobile
MIDlet-Icon: [[MidletIcon]]
MIDlet-Version: [[MIDPVersion|JAD.ini]]
MicroEdition-Configuration: [[MidletType]]
MicroEdition-Profile: [[MIDPVersion|JAD.ini]]
end.
Сначала идёт обработчик, который данные из свойств должен превратить в данные для pas.
В jad должен полезть лишь путь до иконки, так как я не силён в программировании, то просто =Path.
Тоже самое размер. В URL полезет имя точка jar. Тим мидлета тоже обработается, Classic Midlet напрмиер равен CLDC.
Затем уже данные полезут по своим ячейкам. Те, которые обработаны лезут сами, а те, которые "чисты" - из свойств. Соответственно казано свойство и имя ini.
Главным у нас будет MainJAR.pas
Start
ifSize=0
include=no
end.
{
Made in HiAsm Mobile
}
Begin
program [[MidletName|JAD.pas]];
include [[ALL|*.txt]];
Тут я попытался написать, что неиспользующиеся компоненты втискиваться не будут. ))) Естественно он будет выглядеть по другому, т.к. не по одному же компоненту в мидлете должно быть ))
Вот пример надписи:
begin
drawText('[[Caption|Label.ini]]', 0, 0);
repaint;
delay(2000);
end.
и ini:
[About]
Version=1.0
Author=Astramak
[Type]
Class=JarElement
Info=Надпись
[Property]
Caption=Задаёт начальный текст надписи|2|Label
Вроде как всё просто...
Не забудьте скачать архив
Dilma, что скажешь? Galkov?