A폼이 실행중이구요 B폼을 만들어서 B폼에 top값과 Left 값에
값을 넣어주고 버튼을 누른면 A폼의 폼 크기가 변하도록 하는
것인데요 좋은방법이 없나요?
제가 생각한것은 B폼에 값을 넣고 버튼을 누르면
A폼에서 값을 받아서 form.top값과 form.left에 값을
넣어주면 될것 같은데 막시작해서 코딩감이 안오네요
B폼을 모들로 호출하시고, 호출한 폼에서 변경된 Top, Left를 받아올 수 있도록 B폼에서 속성이나 함수, 멤버필드로 제공하시면 됩니다...
procedure TAForm.CallBForm;
begin
BForm := TBForm.Create(nil);
if BForm.ShowModal = mrOK then
begin
Top := BForm.ModifiedTop; // ModifiedTop => BForm에서 입력한 Top
Left := BForm.ModifiedLeft; // ModifiedLeft => BForm에서 입력한 Left
end;
BForm.Free;
end;
굳이 API를 쓰시는 것 보다는 걍 모들로 호출해서 쓰시는게 좋을거 같은데...
B폼을 모들로 호출하시고, 호출한 폼에서 변경된 Top, Left를 받아올 수 있도록 B폼에서 속성이나 함수, 멤버필드로 제공하시면 됩니다...
procedure TAForm.CallBForm;
begin
BForm := TBForm.Create(nil);
if BForm.ShowModal = mrOK then
begin
Top := BForm.ModifiedTop; // ModifiedTop => BForm에서 입력한 Top
Left := BForm.ModifiedLeft; // ModifiedLeft => BForm에서 입력한 Left
end;
BForm.Free;
end;
머 PostMessage를 쓰셔두 별 상관은 없습니다.
^^ 항상 즐코하세요...