Еще один момент не понятен.
Вроде в коде программы явно указан ini файл
procedure Tform_main.N20Click(Sender: TObject);
var
f : TTASKPARM;
aMap : HMAP ;
begin
if (not mvMap.Active)
then exit;
FillChar(f, sizeof(f), 0);
f.Language := cML_RUSSIAN;
f.PathShell := GTKPChar(GTKString(ExtractFilePath(Application.ExeName)));
f.IniName := GTKPChar(GTKString(ExtractFilePath(Application.ExeName)+'.ini'));
aMap := mvMap.MapHandle;
MapPaspEdit(aMap,GTKPChar(GTKString('Map')), @f);
end;
А по факту, нижеприведенная запись автоматически сделана в файле
.ini
т.е. без имени.
[MAPPASP]
Left=244
Top=203
Width=791
Height=314
CurrentXml=D:\UZOR\Proj79\МСК Субъектов РФ.xml
CountFile=1
Запись сделана хорошая, но почему она сделана не в файле
GTKPChar(GTKString(ExtractFilePath(Application.ExeName)+'.ini')); не понятно?
Или может я что-то не так делаю?