Вверх ↑
Этот топик читают: Гость
Ответов: 3655
Рейтинг: 69
#46: 2007-06-29 00:47:20 ЛС | профиль | цитата
nesco, Так он гад всё равно создаёт EXE файл .
Где его на PAS послать
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#47: 2007-06-29 00:48:29 ЛС | профиль | цитата
Вячеслав, а ты откомпилировал CodeGen.dpr и получил CodeGen.dll?
карма: 22

0
Администрация
Ответов: 15295
Рейтинг: 1519
#48: 2007-06-29 00:49:59 ЛС | профиль | цитата
nesco, это и не тебе пост адресован.
карма: 27
0
Разработчик
Ответов: 26163
Рейтинг: 2127
#49: 2007-06-29 00:52:58 ЛС | профиль | цитата
Dilma, вот что я получил при компиляции в режиме Copy
Ошибка компиляции, код - 3 (точка входа в библиотеку не найдена)

HiAsm b 164, пакет delphi-2 и CodeGen.dpr c SVN.
карма: 22

0
Ответов: 3655
Рейтинг: 69
#50: 2007-06-29 00:57:53 ЛС | профиль | цитата
nesco писал(а):
а ты откомпилировал CodeGen.dpr и получил CodeGen.dll?

Конечно. Это в первую очередь.
Вот после Copy
Build start...
Generated code
Create project...
Command line: cmd.exe /k copy "Crogram FilesHiAsmElementsdelphi2codeProject2.pas" "Crogram FilesHiAsmProject2.exe"
‘Є®ЇЁа®ў ­® д ©«®ў: 1.

C:WINDOWSsystem32>
End build

Вот после Delphi
Build start...
Generated code
Create project...
Command line: dcc32.exe "Crogram FilesHiAsmElementsdelphi2codeProject2.dpr" "-U Crogram FilesHiAsm." -Q
Borland Delphi Version 12.0 Copyright (c) 1983,98 Inprise Corporation
24 lines, 0.03 seconds, 17492 bytes code, 1513 bytes data.
End build

карма: 0

0
Администрация
Ответов: 15295
Рейтинг: 1519
#51: 2007-06-29 01:12:03 ЛС | профиль | цитата
nesco писал(а):
Ошибка компиляции, код - 3 (точка входа в библиотеку не найдена)

Delphi2makemake_exe.dll - имеется?
карма: 27
0
Ответов: 3655
Рейтинг: 69
#52: 2007-06-29 01:15:30 ЛС | профиль | цитата
Dilma писал(а):
Delphi2makemake_exe.dll - имеется?

Да конечно.
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#53: 2007-06-29 01:31:58 ЛС | профиль | цитата
Вячеслав, у тебя *.exe файл, полученный при нажатии на "компилировать" в режиме Copy и есть *.pas файл.
Dilma, уже успел заметить. Зря ты в базе pas поменял на exe. Я с прошлого пакета заметил, что этого делать не надо было. Компилятор Delphi нормально компилировал и так, а при Copy выдавал нормальный pas.

[size=-2]------ Добавлено в 01:31
Заменил в базе exe на pas и все встало на свои места. Нормально получаю и pas и exe.
карма: 22

0
Ответов: 2125
Рейтинг: 159
#54: 2007-06-29 10:56:59 ЛС | профиль | цитата
Вячеслав писал(а):
Так он гад всё равно создаёт EXE файл

Так он гад в него ещё и .pas записывает
карма: 1

0
Ответов: 3655
Рейтинг: 69
#55: 2007-06-29 20:06:11 ЛС | профиль | цитата
nesco писал(а):
Заменил в базе exe на pas и все встало на свои места. Нормально получаю и pas и exe.

В какой базе
карма: 0

0
Ответов: 21
Рейтинг: 0
#56: 2007-06-30 15:08:46 ЛС | профиль | цитата
Сделал простенький вьювер картинок. Надо в эдите задать путь к файлам картинок, нажать искать. Потом при выборе файла картинки она должна в окне показываться...
Сейчас компилятор fpc от 161 билда.

Уже в нескольких версиях пытаюсь запускать, работает, но появляются какие-то левые ошибки "Runtime Error 216" и узкое окно на весь экран. И так на каждую картинку...
Что я делаю не так? Как избавиться от этих ошибок?
Add(MainForm,709490,14,7)
{
Left=20
Top=105
Caption="ViewPictures"
link(onActivate,16243288:doWork1,[(75,13)(75,13)])
link(onDeactivate,16243288:doWork2,[(75,20)(75,20)])
link(onCreate,16243288:doWork3,[(75,48)(75,27)])
}
Add(ChildPanel,16243288,105,7)
{
}
BEGIN_SDK
Add(EditMulti,4460087,3,36)
{
WorkCount=5
VarCount=1
Width=286
Height=116
link(doWork1,7480935:Load,[(36,42)(36,46)])
link(doWork2,7480935:Save,[(36,49)(36,53)])
link(doWork3,7480935:Init,[(36,56)(36,60)])
link(doWork4,5190971:doText,[(7,63)(7,108)])
link(Var1,3558587:Text,[(9,140)(209,140)])
}
Add(Panel,12841095,7,180)
{
Width=392
Height=82
Align=2
Point(doColor)
}
Add(MultiElementEx,7480935,70,40)
{
link(outPath,16498921:doWork2,[(131,46)(131,104)])
}
BEGIN_SDK
Add(EditMultiEx,3878524,3,3)
{
WorkCount=#4:Load|4:Save|4:Init|6:inPath|
EventCount=#7:outPath|
Width=286
Height=158
link(Load,7990882:doRead,[(34,9)(34,125)])
link(Save,7990882:doWrite,[(24,16)(24,132)])
link(Init,8127300:doPart,[(15,23)(15,69)])
link(inPath,10847142:doData,[(85,30)(85,27)])
}
Add(Ini,7990882,147,119)
{
Section="Params"
Key="Path"
Type=1
link(onResult,3878524:outPath,[(234,125)(234,9)])
link(FileName,9115459:GetData,[])
link(Value,10847142:GetData,[])
}
Add(StrCat,8198204,91,70)
{
Str2=".INI"
link(onStrCat,9115459:doData,[(138,76)(138,76)])
}
Add(FilePart,8127300,42,63)
{
link(onName,8198204:doStrCat,[])
link(FileName,9120574:AppFileName,[(48,55)(48,55)])
}
Add(Application,9120574,42,7)
{
}
Add(EventFromData,9115459,147,70)
{
}
Add(EventFromData,10847142,168,21)
{
}
Add(InfoTip,8196888,7,168)
{
Info=#47:÷èòàåò è óñòàíàâëèâàåò êëþ÷ Path â .INI - ôàéëå|
Width=281
Height=67
}
END_SDK
Add(Edit,3558587,203,96)
{
Left=110
Top=15
Width=250
link(onChange,7480935:inPath,[(245,102)(245,84)(60,84)(60,67)])
}
Add(HubEx,16498921,161,91)
{
link(onEvent,3558587:doText,[(186,104)(186,102)])
}
Add(Browse,5126593,210,42)
{
link(onBrowse,16498921:doWork1,[(266,48)(266,88)(165,88)])
}
Add(Button,6785324,147,40)
{
Left=365
Top=17
Width=20
Height=18
Caption="V"
link(onClick,5126593:doBrowse,[(194,46)(194,48)])
}
Add(Label,5190971,33,102)
{
Left=125
Top=50
Width=45
}
END_SDK
Add(Image,12382914,427,168)
{
Left=300
Top=145
Align=5
}
Add(ListBox,12935544,217,161)
{
Left=35
Top=100
Width=150
Height=135
Align=1
DataType=1
link(onClick,2088619:doString,[(260,174)(260,178)])
}
Add(Splitter,2023995,168,252)
{
Left=110
Top=235
Width=5
Align=1
}
Add(ComboBox,5121589,14,63)
{
Left=10
Top=45
Width=85
Height=21
Strings=#5:*.JPG|6:*.JPEG|5:*.BMP|5:*.GIF|5:*.PNG|1:*|
}
Add(FileSearch,13088241,124,137)
{
FullName=1
link(onSearch,12935544:doAdd,[(186,143)(186,167)])
link(onEndSearch,696579:doConvert,[(166,150)(166,178)(114,178)(114,199)])
link(Ext,5121589:String,[(130,120)(34,120)])
link(Dir,1248515:Data1,[(137,117)(118,117)])
}
Add(Button,9641633,12,172)
{
Left=10
Top=15
Caption="Èñêàòü"
link(onClick,3995722:doEvent1,[])
}
Add(Hub,3533309,320,172)
{
link(onEvent1,10687170:doLoad,[])
link(onEvent2,10812659:doText,[(357,185)(357,223)])
}
Add(FormatStr,2088619,271,172)
{
Mask="%2\%1"
link(onFString,3533309:doEvent1,[])
link(Str2,1248515:Data2,[(284,110)(125,110)])
}
Add(Convertor,696579,124,193)
{
link(onResult,16243288:doWork4,[(166,199)(166,114)(86,114)(86,34)])
link(Data,13088241:Count,[])
}
Add(Hub,3995722,54,172)
{
link(onEvent1,12935544:doClear,[(151,178)(151,174)])
link(onEvent2,13088241:doSearch,[(105,185)(105,143)])
}
Add(PictureStream,10687170,376,172)
{
link(onLoad,12382914:doLoad,[(417,178)(417,174)])
}
Add(GetData,1248515,112,70)
{
link(Data,16243288:Var1,[(118,55)(111,55)])
}
Add(Label,10812659,376,217)
{
Left=175
Top=50
Width=205
}
Теперь спросил правильно?
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 26163
Рейтинг: 2127
#57: 2007-06-30 17:12:22 ЛС | профиль | цитата
in4, а ты ее праильно выложить можешь, как все выкладывают не sha файлом, а txt. А лучше сходи в справку и почитай, как фаломи обмениваются.
карма: 22

0
Ответов: 21
Рейтинг: 0
#58: 2007-07-02 13:09:22 ЛС | профиль | цитата
м.б. я описание ошибки засунул не туда?
А куда надо?
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 3655
Рейтинг: 69
#59: 2007-07-02 13:12:52 ЛС | профиль | цитата
in4, http://www.hiasm.com/wiki.php?view=63
карма: 0

0
Разработчик
Ответов: 26163
Рейтинг: 2127
#60: 2007-07-02 13:24:21 ЛС | профиль | цитата
in4, я не понял проблемы? Прекрасно читает (проверял на JPG и BMP) без всяких проблем и ошибок. Версия HiAsm какая?
карма: 22

0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)