Új hozzászólás Aktív témák

• Deer_ csendes tag

  2008-03-29 13:46:48 #3306

  Új Válasz

  Új hozzászólás

  Összes hozzászólása itt Válaszok az összes hozzászólására itt Válaszok erre a hozzászólásra

  

  Deer_

  csendes tag

  válasz amargo üzenetére #3305

  Elég sokat keresgéltem, de nem találtam ilyen INGYENES komponenst.
  Viszont letöltöttem egy Adobe Reader SDK-t a az Adobe oldalról. Ez azt írja, hogy járható a dolog, amit én gondoltam - igaz, hogy Visual Basicet vagy C#-ot ajánl.
  Van ebben a leírásban 1 Visual Basic kódrészlet:

  Private Sub myGoto(ByVal where As Integer)
  Dim app as Object, avdoc as Object, pageview as Object
  Set app = CreateObject("AcroExch.App")
  Set avdoc = app.GetActiveDoc
  Set pageview = avdoc.GetAVPageView
  pageview.Goto(where)
  End Sub

  Elvileg ez a megoldás a problémámra.
  Nem nagyon értek basicül, de ha jól gondolom ,ez Delphiben így nézne ki:

  procedure TForm1.FormCreate(Sender: TObject);
  var
  app : variant;
  begin
  app := CreateOleObject('AcroExch.App');
  / stb...stb..
  end;

  Nekem erre kiírja, hogy 'Érvénytelen osztályú karakterlánc'. Az érdekelne, hogy miért.
  Tudsz nekem ebben segíteni?

Új hozzászólás Aktív témák