Man muss procedures nicht bei Type deklarieren.. kann man eigentlich gar nicht oder?
Man kann eine Procedure nur einer Klasse zuweisen indem man sie z.B in den Public Teil schreibt. Du kannst aber sowohl Proceduren als auch Functionen einfach so in den Quelltext setzen.
Delphi-Quellcode:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 =
class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
function KeineAhnung:
String;
begin
Result := '
KeineAhnung';
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Caption := KeineAhnung;
end;
end.
so zum Beispiel...