Abstrakter Fehler bei Instanzenübergabe

[faux]

Hallo!

Ich habe folgenden Code:

Delphi-Quellcode:

procedure Add(var List: TStrings);
begin
  List.Add('Value');
end;

procedure TForm1.Button1Click(Sender: TObject);
var
  List: TStrings;
begin
  List := TStrings.Create;
  Add(List);
  List.Free;
end;

Hier tritt in Zeile 3 ein Abstrakter Fehler auf. Aber wieso?
Könnte mir das jemand erklären und auch ev. eine Lösung des Problems posten?

Danke schon mal.
Grüße
Faux

[mkinzler]

Der Fehler liegt in Zeile 10: TStrings ist abstrakt müßte etwa so heißen:
List := TStringList.Create;

[faux]

Zitat von mkinzler:

Der Fehler liegt in Zeile 10: TStrings ist abstrakt müßte etwa so heißen:
List := TStringList.Create;

Ah! Danke! Es funktioniert.

Grüße
Faux

[Dax]

Manche sehen es auch gern als Bug von Delphi an, überhaupt Instanzen mit abstrakten Methoden (mehr kann bei Delphi ja nicht abstrakt sein ) zu erlauben...

[mkinzler]

Zitat von Dax:

Manche sehen es auch gern als Bug von Delphi an, überhaupt Instanzen mit abstrakten Methoden (mehr kann bei Delphi ja nicht abstrakt sein ) zu erlauben...

Was außer Methoden kann noch abstrakt sein? Aber du hast recht, eigentlich müßte der fehler schon beim Instantiieren kommen.

[Khabarakh]

Zitat von mkinzler:

Zitat von Dax:

Manche sehen es auch gern als Bug von Delphi an, überhaupt Instanzen mit abstrakten Methoden (mehr kann bei Delphi ja nicht abstrakt sein ) zu erlauben...

Was außer Methoden kann noch abstrakt sein?

Nun ja, eben ganze Klassen . Soll heißen, solange mindestens eine Methode noch abstrakt ist, muss die gesamte Klasse als abstrakt gekennzeichnet werden (wie es bei vielen Sprachen der Fall ist). Dann würde auch schon der Compiler und nicht erst die Runtime einen Fehler melden.

PS: Einen Bug würde ich das nicht nennen, schließlich verhält es sich "As Designed". Bezeichnen wir es lieber als - ehm - kleine Designschwäche .

[mkinzler]

Zitat:

Nun ja, eben ganze Klassen Wink .

Laut Theorie ist eine klasse abstrakt, wenn mindestens eine Methode abstrakt ist, daß ist klar. Delphi unterscheidet halt noch zwischen abstrakt und vollständig abstrakt. Von normalen abstrakte Klassen (Klassen mit nicht-abstrakten Methoden) lassen sich Intanzen bilden. Andere Sprachen verweigern dies.

Zitat von mkinzler:

Was außer Methoden kann noch abstrakt sein?

bezog sich auf

Zitat:

(mehr kann bei Delphi ja nicht abstrakt sein Mr. Green)

[Dax]

Zitat von mkinzler:

Was außer Methoden kann noch abstrakt sein?

Properties - wenn man von Delphi weggeht und sich zb. Chrome ankuckt. Dort gehen auch so nette Sachen wieproperty Foo: string; read; abstract;

[Ralf Kaiser]

Zitat von Dax:

Manche sehen es auch gern als Bug von Delphi an, überhaupt Instanzen mit abstrakten Methoden (mehr kann bei Delphi ja nicht abstrakt sein ) zu erlauben...

Hi,

reichen dir diese Warnungen nicht wenn du eine Instanz einer abstrakten Klasse erzeugst??

Code

Delphi-Quellcode:

procedure TForm1.Test;
var s: TStrings;
begin
  inherited;
  s := TStrings.Create;
end;

Was der Compiler dazu sagt:

Delphi-Quellcode:

[Warning] Form1.pas(43): W1020 Constructing instance of 'TStrings' containing abstract method 'TStrings.Get'
[Warning] Form1.pas(43): W1020 Constructing instance of 'TStrings' containing abstract method TStrings.GetCount'
[Warning] Form1.pas(43): W1020 Constructing instance of 'TStrings' containing abstract method 'TStrings.Clear'
[Warning] Form1.pas(43): W1020 Constructing instance of 'TStrings' containing abstract method 'TStrings.Delete'
[Warning] Form1.pas(43): W1020 Constructing instance of 'TStrings' containing abstract method 'TStrings.Insert'

Man sollte sich die Warnungen die der Compiler ausspuckt auch durchlesen und zu Herzen nehmen

Ciao,
Ralf

[Dax]

Zitat von Alfi001:

reichen dir diese Warnungen nicht wenn du eine Instanz einer abstrakten Klasse erzeugst??

Nö. Warnungen kann man ignorieren, Compilerfehler nicht