안녕하세요
수고 많습니다.

invalid typecast error 가 발생 합니다.

typecast을 잘못 한것 같은데....

폼이 틀려서 그런지.... 알 수가 없네요

해결책좀 제시 해 주세요...

이 에러 때문에 3시간을 소비 하고 있습니다.

그래도 계속 error해결책을 찾아 봐야지요.

그럼

수고 하세요

procedure TFLabelbarcode.preview_bill;                                          
var
Edt:array[1..200] of TEdit;                                                      
begin
With FPreview do      //다른 폼                                                          
     begin                                                                      
     for i := 0 to (Panel5.ControlCount - 1) do
         begin
         if (Panel5.Controls[i] is TEdit) then
            begin
            Ei4:=strtoint(getNumber((Panel5.Controls[i] as TEdit).Name));
            FPreview.DevLabelp[Ei4]:=TLabel.Create(FPreview.Panel4);
            with FPreview.DevLabelp[Ei4] do    //DevLabelp:array[1..40] of TLabel;
                    begin
                    Parent    :=panel4;
                    Name      :='DevLabelp' + inttostr(Ei4);
                    Top:=(Panel5.Controls[i] as TEdit).Top;               //Invalid class typecast err
                    Left:=(Panel5.Controls[i] as TEdit).Left;              //Invalid class typecast err
                    Width:=(Panel5.Controls[i] as TEdit).Width;        //Invalid class typecast err
                    Height:=(Panel5.Controls[i] as TEdit).Height;     //Invalid class typecast err
                    end;
            end;
         end;
      end;
end;