델파이5/Win98 Se 입니다.
이미지를 동적으로 생성했는데...
버튼(Button1)이 클릭되면
그렇게 생성된 이미지가 안보이게(Image1.visible:=false;)
하려는데.. 잘 안되구.. 에러만 뜨네요..
쉬울줄 알았는데... 잘 안되고.. 질답을 검색해도 답을 찾기가 힘들더군요...
아래는 소스입니다.
===============================================================
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls;
type
TForm1 = class(TForm)
ScrollBox1: TScrollBox;
Button1: TButton;
Button2: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
var
Image1:TImage;
begin
Image1 := TImage.Create(Self);
Image1.Parent := ScrollBox1;
Image1.Picture.LoadFromFile ('c:imsis01.bmp');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
Image1.Visible := false; -> 이부분 에러
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Image1.free; ->해제도 안되요..
end;
end.
===============================================================
이거 컴파일 에러 나는거 아니에요??
버튼을 눌렀을때가 아니라.. 컴파일도 안될것 같은데..
여기에서 var Image2 : Timage를
위쪽에 보면
Image1 : TImage; <--- 요렇게 하세요..
그럼 즐거운시간 되세요..
- 하얀까마귀 -