Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   "Der linken Seite kann nichts zugwiesen werden." (https://www.delphipraxis.net/146600-der-linken-seite-kann-nichts-zugwiesen-werden.html)

uligerhardt 25. Jan 2010 18:11

Re: "Der linken Seite kann nichts zugwiesen werden.&
 
Das ist tatsächlich neu in D2010 - siehe hier. Dass es vorher ging, wenn man mit "with" rumgetrickst hat, war ein Fehler des Compilers.

Uli.

Webo 11. Feb 2010 13:55

Re: "Der linken Seite kann nichts zugwiesen werden.&
 
Also, das Problem hab ich wohl verstanden, aber ich stehe vor dem Problem, dass ich nicht weiss, wo genau ich denn einen Setter setzen muss ?!

Zu meiner Vorgehensweise: Ich bin an der Stelle, wo der Fehler kommt, also
Delphi-Quellcode:
with FDraw.Display do
        DisplayMode := dmWindowed;
zu DisplayMode "gesprungen", also Strg+LinkeMaustaste drauf. Dann bin ich bei
Delphi-Quellcode:
DisplayMode: TAdWindowDisplayMode
gelandet. Das ist ja direkt in TAdDisplay, was aber ein Record ist. Aus DisplayMode habe ich dann
Delphi-Quellcode:
FDisplayMode : TAdWindowDisplayMode;
    property DisplayMode: TAdWindowDisplayMode read FDisplayMode write FDisplayMode;
gemacht. Das ändert aber am Ganzen nix. Da ich mit properties und read write noch nicht allzu viel am Hut hatte, mich aber ein wenig eingelesen hab, verstehe ich nicht richtig, wo genau denn dieser Setter hin muss.
Wenn mir das einer von Euch noch einmal erklären könnte (muss nicht direkt an diesem Beispiel sein, ich will ja nicht unbedingt alles nur abtippen, sondern es kapieren), das wäre lieb.


MfG

Webo

DeddyH 11. Feb 2010 14:00

Re: "Der linken Seite kann nichts zugwiesen werden.&
 
Delphi-Quellcode:
type
  TWuppdi = class
  private
    FFeld: TDatentyp;
    procedure Setter(const value: TDatentyp);
    function Getter: TDatentyp;
  public
    property Feld: TDatentyp read Getter write Setter;
  end;

procedure TWuppdi.Setter(const value: TDatentyp);
begin
  FFeld := value;
end;

function TWuppdi.Getter: TDatentyp;
begin
  Result := FFeld;
end;

Webo 11. Feb 2010 14:41

Re: "Der linken Seite kann nichts zugwiesen werden.&
 
*DeddyH symbolisch umarm* ;-)

Gelesen, verstanden und erfolgreich angewendet !


Vielen Dank an alle, die mir geholfen haben.


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:14 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz