Da frag ich mich, wie Du bisher klar gekommen bist.
Delphi-Quellcode:
unit Superprogrammunit;
interface
uses
SysUtils
,grids;
const
FIELDSEPERATOR='
;' ;
QUOTECHAR='
"';
ENDOFRECORD=#255;
type
TmyRecord =
record
feld1:integer;
feld2:byte;
end;
var
meinwert:
String;
function Superfunktion:integer;
procedure Ueberfluessigeprocedure(nix:TMyrecord);
implementation
const
CRLF=#13#10;
function Superfunktion:integer;
begin
result:=99;
end;
procedure Ueberfluessigeprocedure(nix:TMyrecord);
begin
end;
end.
So könnte z.B. eine
Unit aussehen.
Gruß
K-H