Billede fra Ado-tabel i fuld størrelse

I mit program med en paradox tabel virker dette fint
procedure TStart.FuldStClick(Sender: TObject);
begin
  FuldStrForm.HorzScrollBar.Range := DBImage1.Picture.Width;
FuldStrForm.VertScrollBar.Range := DBImage1.Picture.Height;
  FuldStrForm.Caption := Caption;
  FuldStrForm.Show;
FuldStrForm.WindowState := wsNormal;
end;

og i unit FuldStrForm1
type
TFuldStrForm = class(TForm)
    DBImage1: TDBImage;

Nu er jeg skiftet til Ado-tabel og mit DBImage er erstattet af Image10.

Ændre så til:

procedure TStart.FuldStClick(Sender: TObject);
begin
  FuldStrForm.HorzScrollBar.Range := Image10.Picture.Width;
FuldStrForm.VertScrollBar.Range := Image10.Picture.Height;
  FuldStrForm.Caption := Caption;
  FuldStrForm.Show;
FuldStrForm.WindowState := wsNormal;
end;

Og i  unit FuldStrForm1 ændres til:
type
TFuldStrForm = class(TForm)
    Image10: TImage;
Får så fejlen:
[Error] FuldStrForm1.pas(10): '=' expected but ':' found
Erstatter så : med = og programmet kan kompileres, men billedet vises ikke. Hvad gør jeg?