var in functions deklaration funktionükelt nicht

[Green]

Zitat von himitsu:

Du willst doch anscheinend nur was in CountStrg zählen?
Dann brauchst du doch eigentlich kein VAR.

schonmal eines davon versucht?

Delphi-Quellcode:

function CountStrg(Start: integer; Const Text: string): integer;
function CountStrg(Start: integer; In Text: string): integer;

function CountStrg(Start: integer; Const Text: TCaption): integer;
function CountStrg(Start: integer; In Text: TCaption): integer;

Ansonsten gäbe es dann auch noch sowas:

Delphi-Quellcode:

function CountStrg(Start: integer; Object: TObject): integer;
  ... TEdit(Object).Text

CountStrg(2, Sender);

Delphi-Quellcode:

function CountStrg(Start: integer; Edit: TEdit): integer;
  ... Edit.Text

CountStrg(2, Sender);

ich will 1. etwas counten, und zweitens einen 2. wert übergeben --> also brauch ich var als schlüsselwort