var m_name : TQRLabel ;
begin
  m_name := Query1.FieldByName('name').AsString;
  m_name.Font.Size := Query1.FieldByName('Size').AsInteger;
   :
   :
end;

위 문장에서 데이터 형식이 AsString이다보니 에러가 나타나네요...
그렇다고 TQRLabel형식이 있는것도 아니구요...
어떻게 해야 하나요??