Q&A

  • Label 찾기
Label 이 10개 있으면요..
여기서 Label10개에서 Caption이 비어있는 곳을 찾아 거기에 값을 주려구 하는데요
아래처럼 해서 비어있는 곳을 찾고 나서 for문을 사용해서 어느 곳인지 알아서 그곳에 값을 넣어 주고 싶은데.... 어떻게 해야 하는지... 급합니다... 좀 알려주세요.

if (FindComponent('Label') as TStaticText).Caption = '' then
1  COMMENTS
  • Profile
    김도형 2002.06.22 20:19
    var
      cFind : TComponent;
      nI : integer;
    begin

    for nI := 1 to 1o do begin
      cFind := FindComponent('Label' + inttostr( nI) );
      if trim( TLabel(cFind).caption) = '' then
        showmessage('어라 비어있네');
    end;

    end;

    이렇게 하시면 될껍니다...

    그리구 'Label' + inttostr(ni) 는 라벨의 이름인거 아시져?? ^^;;

    그럼 이만