Q&A

  • Check된 값만 불러올수 있는 방법좀....
Check된 값중에 가장 작은값을 가져오고싶은데여...

ex)
CheckBox1, CheckBox2.....................CheckBox10
     DBEdit1,      DBEdit2......................     DBEdit10

CheckBox1,......과 DBEdit1,...........은 연결되어있어여...




Check된 DBEdit값이 가장 작은 값을 불러오고 싶은데여...

어떻게 해야할지....... ㅜ.ㅜ

알려주세염...
1  COMMENTS
  • Profile
    염상철 2002.06.27 01:14
    for i:=1 to 10 do
    begin
          if (FindComponent('CheckBox' + IntToStr(i)) as TCheckBox).checked=true then  
          begin
                if (FindComponent('DBEdit' + IntToStr(i)) as TEdit).text<>'' then
                begin
                       if small>strtoint((FindComponent('DBEdit' + IntToStr(i)) as TEdit).text) then small:=strtoint((FindComponent('DBEdit' + IntToStr(i)) as TEdit).text);
                end ;
           end;
    end;

    small ,i 값은 int 로 선언...