Deutsches Lazarusforum

Erst einmal danke für die Antworten.
Ich habe mir gerade Lazarus 1.0.2 heruntergeladen.
Das Compilieren war damit sofort erfolgreich.
Nachdem ich aber ein writeln und ein readln eingefügt habe, bekomme ich den Fehler wieder.
begin
X:=TIntegerList.create(2);
X[1] := 1;
writeln(X[1]);
readln;
end ...

Kann mir denn hierbei keiner helfen?

Da bekomme ich folgendes:
Hint: Start of reading config file C:\lazarus\fpc\2.6.0\bin\i386-win32\fpc.cfg
Hint: End of reading config file C:\lazarus\fpc\2.6.0\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.6.0 [2012/08/28] for i386
Copyright (c) 1993-2011 by Florian KlaemAn unhandled ...

Ok, falle ich immer wieder drauf rein.
Jetzt habe ich die Zeile X.create(2) durch X:=TIntegerList.create(2) ersetzt und bekomme folgende Meldung
"project1.lpr(1,1) Fatal: Compilation aborted".

Hallo,
warscheinlich bin ich mal wieder zu bl.., aber ich bekomme es einfach nicht hin.
Beim ausführen dieses Programms mit der Unit dynarray bekomme ich eine SIGSEGV Exception.
Der constructor wird im Debug Mode angesprungen aber im nächsten Schritt sofort wieder verlassen ohne eine Zeile ...

Hi DiBo33,
danke für die schnelle Antwort.
Du hast natürlich Recht, overload war was fehlte.

Danke.

Hallo,
ich habe zwei Prozeduren mit dem selben Namen in zwei verschiedenen Units. Die Prozeduren unterscheiden sich im Typ des Übergabeparameters. Beim kompilieren bekomme ich folgende Fehlermeldung:
"Error: Call by var for arg no. 1 has to match exactly: Got "TStringArray" expected ...

Hi Scotty, hier ein Auszug aus der Delphi Hilfe:
"If an exception is raised but not handled in the finally clause, that exception is propagated out of the try...finally statement, and any exception already raised in the try clause is lost. The finally clause should therefore handle all locally ...

Hi Theo,
der Schnippsel ist ja nur ein kleiner Auszug als Beispiel des Wesentlichen.
Natürlich steht zwischen Öffnen und Schliessen noch ordentlich Programm Code.
Eine der Stellen liest z.B. Zeilen aus einer Datei, das können locker einige Tausend Zeilen sein.
Die lade ich natürlich nicht auf einmal ...

Danke noch mal für Eure Antworten.

Thema Newbie: Ich habe vor 25 Jahren mein erstes Turbo Pascal Programm geschrieben (natürlich ohne Exceptions).
Ich dache nur, dass so eine Frage in kein anders Forum passt.

Ich wollte auch keine Dikusion OOP vs. nicht OOP anzetteln.
Meine persönliche Meinung ...

Danke für die Antworten,
werde mir beides mal genauer anschauen.

Hallo,
häufig sehe ich folgenden Code im Internet

try
try
assign(Txt, 'Filename');
rewrite(Txt);
writeln(Txt, 'test');
except
on E: Exception do writeln('Exception: ', E.Message);
end;
finally
close(Txt);
end;

Dabei kann aber auch close(Txt) eine Exception auslösen.
Wenn ich aber close(Txt ...

Danke für Eure Antworten.
Ich stamme noch aus dem Zeitalter, wo bei 64K Speicher Schluss war und man verkettete Listen noch selber mit Pointern realisieren musste. Vielleicht wird es Zeit, dass ich mal langsam im 21 Jahrhundert ankomme und mehr Klassen nutze.

Hallo,
hier mal wieder ein typische Anfänger Frage.
Räumt SetLength(A,0) auch Objekte auf?
Beispiel:

var A: array of TObject;
begin
SetLength(A, 1);
A[0].Create();
...
SetLength(A, 0);
end.

Wird A[0].Free beim "entfernen" des dynamischen Arrays automatisch aufgerufen?
Ich vermute ja, ich muss das ...

Hallo Monta,
erst einmal danke für Deine Antwort, werde ich gleich einmal ausprobieren.
Mein grösstes Problem ist, dass ich keine Übersicht über alle Komponenten und deren Funktionen, Prozeduren und Properties habe (zu TSQLScript habe ich grnichts gefunden). Wo kann ich so etwas finden (kann auch ...