> delphi詳しいけど王様には教えたくない

そういわずに頼むよ(;´Д`)
procedure myfunc();
begin
   Edit1.Text := (manko);
end;
っていう処理を何度も使いたいんだがどうすりゃいいのだい？
関数の宣言とかが分からんのだが


参考：2000/11/22(水)18時55分08秒