Es soll keine Version mit den Parametern geben

[xZise]

Hallo ihr,

ich habe ein Problem mit folgendem einfachen Code:

Delphi-Quellcode:

unit UMessageBox;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls;

type
  TDialogTyp = (dtNormal, dtFrage, dtFehler, dtWarnung);

function LibMessageBox(const AOwner : TComponent; const ACaption, AText : string; AButtons : TMsgDlgButtons; ADialogTyp : TDialogTyp) : Integer; overload;
function LibMessageBox(const AOwner : TComponent; const ACaption, AText : string; AButtons : TMsgDlgButtons; ADialogTyp : TDialogTyp; OnHilfeClick : TNotifyEvent) : Integer; overload;

implementation

function LibMessageBox(const AOwner : TComponent; const ACaption, AText : string; AButtons : TMsgDlgButtons; ADialogTyp : TDialogTyp) : Integer; overload;
begin
  Result := LibMessageBox(AOwner, ACaption, AText, AButtons, ADialogTyp, nil);
end;

function LibMessageBox(const AOwner : TComponent; const ACaption, AText : string; AButtons : TMsgDlgButtons; ADialogTyp : TDialogTyp; OnHilfeClick : TNotifyEvent) : Integer; overload;
begin
  Result := mrYes; // nur Beispiel
end;

end.

An sich nichts besonderes. Außer dass er in der Zeile 20 rum meckert:

Zitat:

[DCC Fehler] UMessageBox.pas(20): E2250 Es gibt keine überladene Version von 'LibMessageBox', die man mit diesen Argumenten aufrufen kann

Nun warum ist dies so? Weil ich kann doch die OnClick Eigenschaft eines Buttons auch auf "nil" setzen.

MfG
xZise

[mirage228]

Sowas hatte ich auch mal. Das sollte gehen:

Delphi-Quellcode:

TNotifyEvent(nil)

Viele Grüße

[xZise]

Danke David für die Schnelle und einfache Lösung :D

Funktioniert so super ;) Danke ^^ hätte ich auch selber drauf kommen können :D

MfG
xZise

[jaenicke]

Der Grund dafür ist, dass nil auch auf andere Zeigertypen passen würde, und da könnte Delphi dann nicht entscheiden welches die passende Version der überladenen Methoden ist, wenn es mehrere Methoden mit ansonsten identischen Parametern gäbe. Deshalb muss man das Delphi direkt sagen. ;-)

[DeddyH]

Ich denke mal, dass xZise das auch weiß und nur nicht darauf gekommen ist :mrgreen:

[jaenicke]

Das liest aber vielleicht auch mal jemand anderes, deshalb ist es auch dann sinnvoll es zu erwähnen, denn dieser Fehler kommt ja öfter mal vor. ;-)