Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[9629] 시빌리안님 아래소스 다시한번 정리해서 올립니다..답변부탁드립니다.
마룬타오 [cijjj] 682 읽음    2004-06-19 16:26
다시한번 감사합니다.. (이렇게 빨리 답변을 주시다니 저도 꽤 인터넷사이트를 돌아다니며 많이안다고
자부하고있었는데 이렇게 신속한처리는 처음봅니다.. 저에게는 구세주사이트나 다름없군요.. )

본론으로 들어가서..  취소버튼전체소스입니다..
procedure Tform3.Form_Cancel;  //취소 프로시져
var a : integer;  // 요건 그냥 변수준거구요
begin
with Frm_DM.AQ_TEMP  do begin  //  데이터 모듈에서 호출
   close;
   SQL.Clear;
   SQL.Add('select * from member'); 
   Open;
--문제의 부분 --

  for a:= 1 to 21 do
   Edit(a).Text := fields[a-1].AsString;    //eidt는 에디트박스입니다.

//필드값을 에디트박스에 뿌려줄려고 하는것이지요 .. 그런데 에디트박스가 넘무많아서
edit1.text := fields[0].asstring;
edit2.text := fields[1].asstring;   
         .
         .
계속 써야하기때문에 for문으로 돌려볼려고 하는건데... 
Edit는 결코 아무런의미가 없음니다..  그냥 에디트박스의 기본네임입니다..
 
---이렇게 했습니다..
  end  ;

end;

+ -

관련 글 리스트
9629 시빌리안님 아래소스 다시한번 정리해서 올립니다..답변부탁드립니다. 마룬타오 682 2004/06/19
9630     Re:다시한번 소스정리해서 올립니다.. civilian 702 2004/06/19
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.