Zu viele Parameter bei SizeOf

[venice2]

Zitat:

Durch das WITH wird nunmal das 'SizeOf' von 'NIconD' verwendet und nicht das von System...
Wenn diese Abweichen, dann wird gemeckert.....

Du hast schon recht..

Mein Einwand aber dazu warum wird unter 32Bit, selber Code, dann nicht gemeckert?
Das widerspricht sich doch alles.

Aber danke habe es geändert waren nur 2 im ganzen Code

Zitat:

KEIN 'WITH' verwenden!

Jo, man ist halt ein Gewohnheitstier.

[TiGü]

Zitat von venice2:

Mein Einwand aber dazu warum wird unter 32Bit, selber Code, dann nicht gemeckert?
Das widerspricht sich doch alles.

Hast du TNotifyIconData unter Win32 irgendwo anders definiert?
Wohin springt er denn bei der Suche nach der Declaration für Win32?

Folgendes kompiliert in Delphi 10.4 unter Debug-Wind32 NICHT:

Delphi-Quellcode:

program Project6;

{$APPTYPE CONSOLE}

{$R *.res}


uses
    System.SysUtils,
    Winapi.ShellAPI;

var
    NIconD: TNotifyIconData;

begin
    try
        with NIconD do
        begin
            cbSize := SizeOf(TNotifyIconData); // [dcc32 Error] Project6.dpr(19): E2034 Too many actual parameters
        end;
    except
        on E: Exception do
            Writeln(E.ClassName, ': ', E.Message);
    end;
en

[venice2]

Zitat:

Hast du TNotifyIconData unter Win32 irgendwo anders definiert?
Wohin springt er denn bei der Suche nach der Declaration für Win32?

Nein aber eine andere Delphi Version D2010.

Dort verwendet er mit With die System Unit und nicht die ShellAPI.
Habe eine neue Version von GdipClock64 hochgeladen mit den Änderungen und gleichzeitig die Anzeige des Datum verbessert.

Delphi-Quellcode:

program Project6;

{$APPTYPE CONSOLE}

uses
    SysUtils,
    ShellAPI;

var
    NIconD: TNotifyIconData;

begin
  try
    try
        with NIconD do
        begin
            cbSize := SizeOf(TNotifyIconData);  //Kompiliert
        end;
    except
        on E: Exception do
            Writeln(E.ClassName, ' ', E.Message);
    end;
  finally
    Writeln('D2010 - ', 'No error');
  end;
end.

D2010 nicht gleich Delphi 10.4

[HolgerX]

Hmm..

Zitat von venice2:

Zitat:

Hast du TNotifyIconData unter Win32 irgendwo anders definiert?
Wohin springt er denn bei der Suche nach der Declaration für Win32?

Nein aber eine andere Delphi Version D2010.

Und da haben wir wohl den Grund (Delphi 2010)..
Denn dort gab es glaube ich noch keine Records mit Funktionen und deshalb auch kein SizeOf im Record...
Somit wurde SizeOf von System seitens des Compilers genommen.

[venice2]

Zitat von HolgerX:

Hmm..

Zitat von venice2:

Zitat:

Hast du TNotifyIconData unter Win32 irgendwo anders definiert?
Wohin springt er denn bei der Suche nach der Declaration für Win32?

Nein aber eine andere Delphi Version D2010.

Und da haben wir wohl den Grund (Delphi 2010)..
Denn dort gab es glaube ich noch keine Records mit Funktionen und deshalb auch kein SizeOf im Record...
Somit wurde SizeOf von System seitens des Compilers genommen.

Nun ja warum soll ich für 32 Bit "D11" nutzen wenn dadurch die EXE sich um 2MB vergrößert sehe da keinen Sinn drin.
Ja ich weiß wir haben Terrabyte zur Verfügung spielt aber keine rolle für mich.

Dann ist das wohl geklärt liegt an der jeweiligen Delphi Version.