also, mein delphi meint jetzt, es müsste sich mit intelligenten fehlermeldungen hervortuen.
Delphi-Quellcode:
const
MaxPages = 10; //+1
var
Changed: array [0..MaxPages] of Boolean;
Delphi-Quellcode:
procedure TForm_Main.Menu_CloseClick(Sender: TObject);
var i:Integer;
begin
for i:=PageControl.ActivePageIndex to MaxPages-1 do
Changed[i]:=Changed[i+1];
end;
soweit so gut
nun aber folgendes:
Zitat:
(Fehler) Unit1.pas(69): Array-Typ erforderlich
IST DER DUMM?????