Registriert seit: 22. Jan 2005
344 Beiträge
Delphi 2007 Professional
|
AW: Trennung von GUI und Logik, wie geht ihr vor?
28. Nov 2017, 02:14
Hallo zusammen,
in diversen Themen hier taucht ja immer wieder die Trennung von GUI und Logik auf. Mich würde es mal interessieren wie ihr dabei vor geht.
Beispiel:
Ein Formular mit zwei Edits, einem Button und einem Label.
Delphi-Quellcode:
unit uMain;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, uAddition, StdCtrls;
type
TForm1 = class(TForm)
EditZahl1: TEdit;
EditZahl2: TEdit;
ButtonAddition: TButton;
LabelErgebnis: TLabel;
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.
Eine Klasse mit einer "extrem schwierigen" Berechnung:
Delphi-Quellcode:
unit uAddition;
interface
type
TAddition = class
private
FErgebnis: Integer;
public
function Addition(Zahl1, Zahl2: Integer): Integer;
property Ergebnis: Integer read FErgebnis;
end;
implementation
{ TAddition }
function TAddition.Addition(Zahl1, Zahl2: Integer): Integer;
begin
FErgebnis := Zahl1 + Zahl2;
Result := FErgebnis;
end;
end.
Vielen Dank schon mal für euer Mitmachen!
Sorry, dass ich den alten Thread aufwärme, aber ich versuche mich in MVC einzuarbeiten und würde paar ein konkrete Beispiele in Delphi benötigen. Bei diesem einfachen Beispiel würde mich interessieren wie man sowas unter Delphi 2007 löst. Stevie hat zwar ein komplettes Beispiel gepostet, aber man benötigt DSharp, damit es läuft. Wie könnte man dieses Beispiel als MVC ohne zusätzliche Bibliothek umgestaltet werden?
lg,
jus
|
|
Zitat
|