Word'deki bir sayfayı delphide gösterme.

[delphici]

selam

mesela a.doc isminde bir word dosyam olsun. Word dosyadaki yazıları delphide listelettirmek istiorum. Yazı tipi, büyüklüğü gibi özellikleri değişmeyecek şelilde. Bunla ilgi bildiğiniz bir yöntem, component varsa lütfen yazın.

Herkeze iyi çalışmalar.

Not : Formda aradım ama tam bir cevao bulamadım.

[gkimirti]

sanırım TurboPower ın OfficePartner seti ile yapılabiliyor
demolarında gormustum

[delphici]

bunları bulabileceğim bildiğiniz bir yer varmı. Ben yine bir arayım. Bulursanız yazmayı unutmayın

Teşekkür ederim İyi Çalışmalar.

[selm@n]

detaylı bilgi ;
http://www.delphiturkiye.com/index.php? ... icePartner
iyi çalışmalar;

[mrmarman]

Merhabalar...

- 3.parti bilşen yerine OLE ile Word dökümanlarına (OleAutomation diye adlandırılıyor) erişim yapmayı düşünürsen http://www.djpate.freeserve.co.uk/AutoWord.htm linkindeki bilgiler işine yarayabilir...

// Edit - Düzeltme - Ekleme //

- Fikir oluştursun diye örnek yazmak için ekleyim dedim... Forma bir adet TMemo koy adı Memo1 olduğunu düşünürsek...

Kod: Tümünü seç

Uses ComObj, Word97

Kod: Tümünü seç

var
  Word        : Variant;
begin
  try
    Word := GetActiveOleObject('Word.Application');
  except
    ShowMessage('MSWord açık değil');
    Exit;
  end;
  Word.ActiveDocument.Content.Copy;
  Memo1.PasteFromClipboard;
end;

[delphici]

dediğiniz şekilde yapılıyo ama beni istediğim yazı tipi,boyutu gibi özelliklerinin değişmemesi bunun ilgili bir component olabilir.

---------------------------------------------------------
Turbopwer Office Partner componentini kurdum amam tam olarak kullanmayı çözemedim şu anda uğraşıyorum ama blien arkadaşlar yarım ederse sevinirim.

Her keze teşekkür ederim iyi çalışmalar.

[mrmarman]

Merhaba...

- TMemo yerine TRichEdit kullanırsaznı yazı stili, paragraf formatları ve hatta tablolar korunarak gelir...

[delphici]

sealm
dediğin gibi yaptım yazı tipi, büyüklüğü filan korunaklı geliyo. Göndermiş olduğun kod açık bir word belgesinin içindeki yazıları alıyo yapmak istediğim yolunu belirttiğim word belgesinin içeriğini listelemek. Bide buna el atarsan sevinirim gerçi ben uğraşıyom.

Yardım eden tüm arkadaşlara teşekküer ederim.

İlgilendiğiniz için sağ olun. İyi çalışmalar.

[mrmarman]

Tekrar Merhaba...

- Word açık değilse açar, FileName'de belirtilen dosyayı okuyup Word'ü kapatır...

Kod: Tümünü seç

const
  wdDoNotSaveChanges    = $00000000;
  wdSaveChanges         = $FFFFFFFF;
  wdPromptToSaveChanges = $FFFFFFFE;
var
  Word        : Variant;
  FileName    : String;
  SaveChanges : OleVariant;
begin
  try
    // Aktif Word varsa onu kullanıyoruz...
    Word := GetActiveOleObject('Word.Application');
  except
    // Aktif Word yok biz açıyoruz...
    Word := CreateOleObject('Word.Application');
  end;

  FileName := 'D:\Belgelerim\Nema.doc';
  Word.Documents.Open(FileName, EmptyParam, EmptyParam, EmptyParam,
  		      EmptyParam, EmptyParam, EmptyParam, EmptyParam,
		      EmptyParam, EmptyParam);
  Word.ActiveDocument.Content.Copy;
  RichEdit1.PasteFromClipboard;
  SaveChanges := wdDoNotSaveChanges;
  Word.Quit(SaveChanges, EmptyParam, EmptyParam);
end;

[delphici]

selam

çok sağol arkadaş verdiğin kodlar işimi gördü. Tekrar teşekkür ederim iyi çalışmalar.

[cortex]

powerpoint için de yarıyor mu bu şeyler?

[cortex]

tamam güzel de ben form içinde açmak istiyorum powerpointi

[mrmarman]

Merhabalar...

- Kısa yoldan işinizin görüldüğüne sevindim...

@Programci

- Ben henüz bu bileşen paketini kurmadım da, hazır sizde varken diye sorayım dedim... Belki ilerde bana da lazım olur diye soruyorum;

- Boş bir Delphi application açıp, bunu derledikten sonraki EXE büyüklüğünü ile Turbopower Office Partner'den Word ile ilgili benzer işi yapan bileşeni forma koyduktan sonra derlenmiş EXE büyüklüklerini yazabilir misiniz ?