Q&A

  • 이벤트 프로시져 이름을 맘대로 바꾸려면 ?
한 폼에서 여러개의 DBEdit 에 대한
OnChange Event 를 하나로 통일시키려고 하거든요..
그래서 FormCreate Event 에  다음과 같은 부분을 추가시키고 싶어요..

    For L1 := 0 to ComponentCount-1 do
    begin
          If (Components[L1].tag = 37) then
             Components[L1].OnChange  :=  setCalculateValues();
    end;


여기서 setCalculateValues() 가 통일시키고싶은 프로시져 이름인데요..
잘 안되네요 ^^,   도와주세요 ^^
이 게시물을
2  COMMENTS
  • Profile
    안영제 • 2002.11.25 12:04


    특정 컴포넌트가 TDBEdit 타입인지 확인한 후, 타입 캐스팅을 해야합니다.

    For L1 := 0 to ComponentCount-1 do
    begin
        If (Components[L1] is TDBEdit) and (Components[L1].tag = 37) then
           TDBEdit(Components[L1]).OnChange  :=  setCalculateValues();
        end;
  • Profile
    이수열 • 2002.11.26 20:26



    알려주신대로 하고 컴파일 하니까 이런 에러가 뜨네요..

    - incompatible types: "TNotifyEvent" and "procedure untyped pointer, or untyped parameter"

    한번만 더 도와주세요 ^^
←First Page
806 807 808 809 810 811 812 813 814 815
Last Page→
한델 로그인 하기