Q&A

  • MDI폼에서 모두 저장하기 기능을 만들고 싶습니다. 도와주세요!
자식폼에는 이런 함수가 있습니다.

>procedure TMDIChild.FileSaveText();

>begin

> REdit.Lines.SaveToFile(Caption);

> REdit.Modified:=false;

>end;



그런데 이런 자식폼의 함수를 부모 폼에서 자식 폼 수만큼 이동하면서

이 함수를 실행 하고 싶습니다.

이렇게 해보았는데 잘 안되네요!..



>procedure TMainForm.ChildSaveAll();

>var

> cnt:integer;

>begin

> Child:=ActiveMDIChild as TMDIChild;

> for cnt:=MDIChildCount-1 downto 0 do begin

> MdiChildren[cnt].ActiveMDIChild;

> child.REdit.Lines.SaveToFile(MdiChildren[cnt].Caption)

> end;

>end;

>

>틀린 부분을 알으켜 주세요..





0  COMMENTS