![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Вышел Free Pascal 2.0
apus © (2005-05-17 15:39:00)Автору и активистам КОЛ, можно ли в ближайшее время ожидать свежий порт под сабж? Хорошо бы не только под Win, но и под Lin. А также неплохо бы освежить порт под Kylix, т.к. то что сейчас есть - даже консоль в линуксе не полноценна.
thaddy (2005-05-23 11:28:00) [1]Procedure TObj.Free;
begin
If @Self Nil Then
DoDestroy;
end;
Sorry again. Have a look at the examples tonight at 20.00 gmt+1
(Rotterdam) It includes kol.pas 2.08 with the small patches,
delphidef.inc with proper settings and the example programs.
thaddy (2005-05-23 11:26:00) [2]Use -Mdelphi -OgrP2 and -CX
Download and unpack ppDelphi!
You cannot use objpas mode!
Look at the example at my site. I have no problems at all.
One small addition:
Tobj.free should be
procedure TObj.Free;
begin
if Self nil then
DoDestroy;
end;
After all.
Tonight I will post a complete set of examples on my website:
A basic form,
A whois with HUI
A rgb HSL example
A basic forms designer
All work great and are under 100K
It seems the FP overhead comared to Delphi + KOL (w.o. sysdcu) is only about 20K and remains pretty constant
Thaddy (2005-05-20 15:12:00) [3]Forgot: DO NOT USE FP.EXE!
It sucks.
Use the Lazarus editor! or the commandline compiler.
Yhrik! (2005-05-20 12:03:00) [4]Я про это:
e╔═[■]═════════════λ 2;═════════════════ ;═══════╗
d║ ║K
a║ Program generated a RTE 33 ║
║ at address $008127D1. ║
║ Save your sources and restart the IDE. ║
═║ ║══
*║ Ok ▄ Cancel ▄ ║
║ ▀▀▀▀▀▀▀▀▀ ▀▀▀▀▀▀▀▀▀ ║
╚════════════════& #9552;════════════════ 9552;════════╝
Thaddy (2005-05-20 11:37:00) [5]Oh,
Forgot:
{$DEFINE APPTYPE GUI} for windows apps, I forgot that, otherwise you always get a console as well.
The changes are not necessary for KOL console applets.
Thaddy (2005-05-20 11:35:00) [6]These are the changes:
- DO NOT USE GLUECUT ANY MORE!!!!!!
- COMPILE PAS_VERSION
Change TObj.Free to this:
{$IFNDEF F_P}
{^^^^^^^^}
procedure TObj.Free;
begin
// if Self <> nil then
//^^^^^
DoDestroy;
end;
Change Logfileoutput to this:
procedure LogFileOutput( const filepath, str: String );
var F: HFile;
T:string;
begin
F := FileCreate( filepath, ofOpenWrite or ofOpenAlways );
if F = INVALID_HANDLE_VALUE then Exit;
FileSeek( F, 0, spEnd );
T:=str+#13#10;
FileWrite( F,T, Length( str ) + 2 );
FileClose( F );
end;
That's all
Yhrik! (2005-05-20 09:06:00) [7]IDE вываливается при компиляции KOL.
В командной строке fp я не силён :((
Thaddy (2005-05-17 16:14:00) [8]The port to 2.0.0 is easy: it simply works!
the FPC port can even be modified to be simpler, because 2.0.0 supports properties in objects.
The port to linux is another story: it has never passed early alpha and needs a lot of work, because kol win32 needs to be mapped to kol gtk+. The port should be considered a ' proof of concept' rather than a port. Forget it for now ;)