Autor Beitrag
Terra23
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 872

Win 8
Delphi 7
BeitragVerfasst: Do 15.05.03 17:48 
Hi ihr.

Ich habe ein Problem. Mir ist mein verschollenes Delphi-Buch (Softwareentwicklung mit Delphi 4) wieder in die Hände gefallen und nun habe ich folgendes Problem:

ausblenden Quelltext
1:
2:
3:
4:
5:
6:
7:
function CheckEdit(Feld: TEdit): Boolean;
var cl: TColor;
begin
Result:=Feld.Text='Valid';
If Result Then cl:=clBlue Else cl:=clRed;
Feld.Font.Color:=cl;
end;


Nun habe ich folgende Frage(n):

1) Was bedeutet Result. Ein Boolean? Warum ist er nicht definiert worden? Ich habe diesen Ausdruck hier im Forum schon öfter gelesen.

2) Und was bedeutet die Zeile
ausblenden Quelltext
1:
Result:=Feld.Text='Valid';					


3) Bedeutet Feld.Font.Color soviel wie Sender As TEdit?

Wäre nett, wenn mir jemand helfen könnte. :-)

_________________
Hasta La Victoria Siempre
GruppeCN
ontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic starofftopic star
Beiträge: 322



BeitragVerfasst: Do 15.05.03 18:01 
Der Code ist eine function und die gibt einen Result Wert. Mit dem :Boolean wurde der Rückgabe Wert als Typ Boolean festgelegt. Der Rückgabe Wert wird mit Result := zurück gegeben. Das lässt sich zum Beispiel so umsetzen:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
function was(s:string):Boolean;
begin
  Result := false;
  if s = "geheim" then
   Result := true;
end;

if was("gehei") then ShowMessage('Hallo Welt');


2) Wenn der Text von Feld Valid ist wird als Result true übergeben

3) Feld.Font.Color setzt die Farbe des Feldes auf die Farbe hinter dem :=

_________________
Warum sind die Sachen, die du suchst, immer da, wo du zuletzt nachsiehst?
Weil du aufhörst zu suchen, wenn du sie gefunden hast.