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

• GuMipOkE senior tag

  #151

  #150 GuMipOkE

  2003-05-12 09:44:39

  Ú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

  

  GuMipOkE

  senior tag

  #150 GuMipOkE

  #150 GuMipOkE

  Ha még aktuális...
  
  BC++ builder-ben igy néz ki egy Excell cella adatának kiolvasása.
  
  adat=WSheet.OlePropertyGet(''Range'', ''D4'');
  
  Mivel a Delphi is ugyanazt az Olefunkciókat használja, gondolom az átültetés valahogy igy nézhet ki:
  
  adat:=WSheet.OlePropertyGet(''Range'', ''D4'');
  
  

  A szemléltetés kedvéért (BC++ban):
  
  Variant ExcelApp = CreateOleObject(''Excel.Application'');
  ExcelApp.OlePropertySet(''Visible'', false);
  Variant WBook = ExcelApp.OlePropertyGet(''Workbooks'').OleFunction(''open'', ''C:\\test.xls'');
  Variant WSheet = WBook.OlePropertyGet(''ActiveSheet'');
  WSheet.OleProcedure(''Activate'');
  adat=WSheet.OlePropertyGet(''Range'', ''D4'');
  ShowMessage(''A kért adat: '' + adat);
  ExcelApp.OleProcedure(''Quit'');
  
  

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