Początki są zawsze trudne, więc proszę o wyrozumiałość
Mam problem z tworzeniem i wywołaniem własnej procedury.
Delphi wywala mi błędy w miejscu gdzie deklaruję moją procedurę i tam gdzie ją chcę wywołać.
Proszę mi wskazać gdzie robię błąd?
[syntax=delphi]unit Unit1;
interface
uses
Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
Vcl.Controls, Vcl.Forms, Vcl.Dialogs;
type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
procedure MojaProcedura; //Deklaracja mojej procedury.
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormCreate(Sender: TObject);
begin
MojaProcedura; //Wywołanie mojej procedury.
end;
procedure MojaProcedura;
begin
//Treść mojej procedury.
end;
end.[/syntax]
Statystyki: Napisane przez ANT — 11 paź 2017, o 22:37
]]>