Q&A

  • class이렇게 쓰면 안되나요?
자꾸 TA란 클래스 만들려구 하는데.. = 가 잘못됐다구 나오는데.미치겠떠여.
에러안나게 수정해야할부분 알려주시고요.
class 이야기좀 부탁드립니다.........
죄송합니다. 넘 초보졍..흐흑.

답변 꼭 부탁드립니당.~~
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;

type
  TA = class(Tobject)
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    priA : Integer;
  protected
    proA : Integer;
    { Private declarations }
  public
    pubA : Integer;
    { Public declarations }
  procedure Access;
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
var
    A : TA;

begin
    A :=TA.Create;
    A.Destroy;
end;

end.
1  COMMENTS