안녕하세요.
우편번호 검색 프로그램을 하나 만든느데..
폼에서 달랑 edit하나만 있고 여기서 동이름을 입력하면
자동으로 메인폼에의 edit에 바로 우편번호가 검색되어
값이 입력이 될려면 어떻게 해야합니까.
현재 저는 grid를 이용해서 값을 입력하면 grid에 나타나고
해당 우편번호를 클릭하면 바로 해당폼에 들어 가는 것까지 했는데
저는 grid를 사용하고 싶지 않습니다.
또 한가지 염치 없지만....
grid에서 cellclick event에서 click시 해당 target으로
들어가도록 했는데 않됩니다. 그런데 double click은
되거던요.
그럼 이만.. 미리 감사를 드립니다.
> 안녕하세요.
> 우편번호 검색 프로그램을 하나 만든느데..
> 폼에서 달랑 edit하나만 있고 여기서 동이름을 입력하면
> 자동으로 메인폼에의 edit에 바로 우편번호가 검색되어
> 값이 입력이 될려면 어떻게 해야합니까.
> 현재 저는 grid를 이용해서 값을 입력하면 grid에 나타나고
> 해당 우편번호를 클릭하면 바로 해당폼에 들어 가는 것까지 했는데
> 저는 grid를 사용하고 싶지 않습니다.
> 또 한가지 염치 없지만....
> grid에서 cellclick event에서 click시 해당 target으로
> 들어가도록 했는데 않됩니다. 그런데 double click은
> 되거던요.
> 그럼 이만.. 미리 감사를 드립니다.
질문에 맞는 답이 되련지 모르겠네요..
생각보다 간단한 방법인데 폼이 MainForm이 create(edit event 발생후)
되기전 변수에 우편번호를 넣어주고 create 된후 main form 에서 그 값을 불러오면
어떨지요.
그럼 아래 예제를....
//pe_zip 우편번호, frmzip : zip form, frmmain : main 폼, sg1 : stringgrid
procedure Tfrmzip.sg1Click(Sender: TObject);
begin
pe_zip := sg1.cells[0,(Sender As TStringGrid).Row];
frmmain := Tfrmmain.Create(application);
frmmain.show;
frmmain.zip.Text := frmzip.pe_zip; // zip form 에서 pe_zip 변수 값을 읽어옴.
만약 폼이 create 된상태라면 Onactivate event 에 넣어주시면 되겠지요.
대답이 되었나요?