Вышел Free Pascal 2.0

← →
apus (2005-05-17 15:39) [0]

Автору и активистам КОЛ, можно ли в ближайшее время ожидать свежий порт под сабж? Хорошо бы не только под Win, но и под Lin. А также неплохо бы освежить порт под Kylix, т.к. то что сейчас есть - даже консоль в линуксе не полноценна.

← →
Thaddy (2005-05-17 16:14) [1]

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 ;)

← →
Yhrik! (2005-05-20 09:06) [2]

IDE вываливается при компиляции KOL.
В командной строке fp я не силён :((

← →
Thaddy (2005-05-20 11:35) [3]

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

← →
Thaddy (2005-05-20 11:37) [4]

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.

← →
Yhrik! (2005-05-20 12:03) [5]

Я про это:
e╔═[■]═════════════&#955 2;════════════════&#9552 ;═══════╗
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 15:12) [6]

Forgot: DO NOT USE FP.EXE!
It sucks.
Use the Lazarus editor! or the commandline compiler.

← →
thaddy (2005-05-23 11:26) [7]

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-23 11:28) [8]

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.

Вышел Free Pascal 2.0 Найти похожие ветки