Delphi Dünyası Facebook'ta

Kodbank İndir

! CODEBANK 2012 !

İNDİRMEK&DETAYLI BİLGİ ALMAK İÇİN BURAYI TIKLAYINIZ.

Gönderen Konu: OLE kullanımı  (Okunma sayısı 1499 defa)

0 Üye ve 1 Ziyaretçi konuyu incelemekte.

Çevrimdışı hayati

  • Administrator
  • *****
  • İleti: 860
  • Rep: +19/-3
  • Cinsiyet: Bay
OLE kullanımı
« : 03 Kasım 2007 16:57:34 »
Bir(den fazla) OLE nesnem var ve
Kod:  (Unknown Language)
  1. procedure TForm1.ComboBox1Change(Sender: TObject);
  2. begin
  3. if combobox1.ItemIndex=0 then
  4.  begin
  5.     olecontainer1.Visible:=true;
  6.     //olecontainer1.AllowInPlace:=true;
  7.     //olecontainer1.AutoActivate:=aagetfocus;
  8.     olecontainer1.Run // ? ? ?
  9.  end
  10.  else
  11.   olecontainer1.Visible:= false;
  12. end;
comboboxtaki seçime bağlı olarak bunları ekranda gösteriyorum. ancak sorun şuki OLE nesnesi (excel çalışma sayfası) görünüyor ancak aktif olması için üzerine tıklanması gerekiyor. properties seçimlerinde Autoactivite yi de kuracaladım sonuç alamdım, kodla veya ayarlarla OLE nesnesi nasıl direkt aktif yapılablir

Olsa dahi tenimin kıl biten her yeri bir dil, güçsüzüm şükretmeye,şükrüm binde bir bile değil (İ.R.)

Çevrimdışı hayati

  • Administrator
  • *****
  • İleti: 860
  • Rep: +19/-3
  • Cinsiyet: Bay
Ynt: OLE kullanımı
« Yanıtla #1 : 03 Kasım 2007 17:54:41 »
 :) olecontainer1.DoVerb(0);
Olsa dahi tenimin kıl biten her yeri bir dil, güçsüzüm şükretmeye,şükrüm binde bir bile değil (İ.R.)