@Ádám:
Win98 éppen beállítja a "rendszerszoftvert".
Ez értelmes kifejezés?

@Ádám:
Ez az IE semmit nem támogat...

@Ádám:
Csak van erre is Opera.

@TCH:
Minek neked egyébként win98? DOS játékokhoz?

@cousin333:
A kiadás kapcsán megjelent egy videó is, ami érthető okokból nem a szokásos új funkciókra összpontosít, hanem az úttalon utakon életérzést kívánja kihangsúlyozni. Talán jelképes is, ahogy a címszereplők a szikla széléről a mélybe vetik magukat. Nekik kinyílt az ernyőjük...

for i := 1 To 9 do
begin
numi := i;
end;

for i:=1 To 9 do
begin
Labeli.Caption := 'HAHA'
end;

var kecske: array[0..2] of integer;
begin
	kecske[0] := 1;
	kecske[1] := 42;
	kecske[2] := 666;
end.

var kecske: record
	fasz_van: boolean;
	hany_darab: integer;
end;

begin
	kecske.fasz_van := true;
	kecske.hany_darab := 4;
end.

type kecske = record
	gyilkos: boolean;
	aldozatok_szama: integer;
end;

var balfasz_ede, mekk_elek: kecske;

begin
	mekk_elek.gyilkos := true;
	mekk_elek.aldozatok_szama := 4;
	balfasz_ede.gyilkos := false;
	balfasz_ede.aldozatok_szama := 4567112;
end.

var kecskefasz: array[0..1] of record
	anyad: integer;
end;

type kecskesegg = record
	mocskostelapo: boolean;
end;

var rohadas: array[0..2] of kecskesegg;

begin
	kecskefasz[0].anyad := 111;
	kecskefasz[1].anyad := 444;
	rohadas[0].mocskostelapo := true and false;
	rohadas[1].mocskostelapo := true xor true;
	rohadas[2].mocskostelapo := not true;
end.

type tlabel = record
	caption: string;
end;

var label: array[1..9] of tlabel;
var i: integer;

begin
	for i := 1 to 9 do
	begin
		label[i].caption := 'HAHA';
	end;
end.

var Label: array[1..9] of tcaption;

procedure init_labels;
begin
	label[1] := tcaption.create;
	label[1].width := 100;
	label[1].height := 16;
	label[1].top := 200;
	label[1].left := 300;
	label[1].visible := true;
	// es ugyanigy az osszes tobbire
end;

procedure mittudomen;
var i: integer;
begin
	for i := 1 to 9 do
	begin
		label[i].caption := 'HAHA';
	end;
end;

var label: array[1..9] of ^tcaption;

procedure init_ptrs;
begin
	label[1] := @Label1;
	label[2] := @Label2;
	label[3] := @Label3;
	//etc
end;

procedure mittudomen;
var i: integer;
begin
	for i := 1 to 9 do
	begin
		label[i]^.caption := 'HAHA';
	end;
end;

@TCH:
Mert windowsky csak úgy dönt, hogy akárhová odabaszhatja a szar helyreállítási partícióját

@TCH:
Aztán van még olyan, hogy pointerlistából hivatkozol rájuk. Olyankor ugyanúgy megcsinálod a labeljeidet a formon, viszont a kódban csinálsz róluk egy pointerlistát.var label: array[1..9] of ^tcaption;

procedure init_ptrs;
begin
label[1] := @Label1;
label[2] := @Label2;
label[3] := @Label3;
//etc
end;

procedure mittudomen;
var i: integer;
begin
for i := 1 to 9 do
begin
label[i]^.caption := 'HAHA';
end;
end;'Sztannyi.