Delphi Forum

kod ile olduğunda nasıl yapılır bunu öğrenmek istiyorum

delphi 7 sürümü

Aşağıdaki kod ile Mssql den verileri excel'e aktarıyorum fakat başlıkları alamıyorum bunu nasıl alabilirim ne eklemem gerekiyor yardım ederseniz sevinirim . procedure ExportRecordsetToMSExcel(DestName: string; Data: _Recordset); var ovExcelApp: OleVariant; ovExcelWorkbook: OleVariant; ovWS: OleVaria...

Cevap yazan arkadaşlar için çok teşekkür ederim problemi aşağıda paylaştığım kod ile çözdüm.Tekrar teşekkür ederim. procedure TForm1.Button3Click(Sender: TObject); var i: Integer; begin adoQuery1.Close; adoQuery1.SQL.Clear; adoQuery1.SQL.Add('select * from dbo.L_LOG'); ADOQuery1.Prepared; adoQuery1....

procedure TForm1.Button1Click(Sender: TObject); begin ADOQuery1.First; ProgressBar1.Position:=0; ProgressBar1.Max:=ADOQuery1.RecordCount; ProgressBar1.Update; while not ADOQuery1.Eof do begin adoQuery1.Close; adoQuery1.SQL.Clear; adoQuery1.SQL.Add('select * from dbo.L_LOG'); adoQuery1.Open; Progres...

ExportRecordsetToMSExcel('D:\x.xls', ADOTable1.Recordset );

bu şekilde kullandım teşekkür ederim iyi çalışmalar

procedure ExportRecordsetToMSExcel(DestName: string; Data: _Recordset); var ovExcelApp: OleVariant; ovExcelWorkbook: OleVariant; ovWS: OleVariant; ovRange: OleVariant; begin ovExcelApp := CreateOleObject('Excel.Application'); //If Excel isnt installed will raise an exception try ovExcelWorkbook := ...

Merhaba arkadaşlar ben bir konuda takıldım forumda da araştırdım fakat bulamadım. SQL server dan çektiğim bir veriyi dbgride aktarıyorum bu aktarmış olduğum veriyi excele nasıl aktarabilirim.Dbgride aktarılan veriler sürekli değişiyor sutun isimleri yani bu değişim için standart bir kod varmıdır. so...

Merhaba arkadaşlar yedekleme ile ilgili projeyi çalışır durumda aşağıdaki linkte paylaşıyorum . program sadece klasör ve alt dizinlerini sizin istediğiniz yere kopyalama yapıyor sadece gauge çalışmıyor bunu yapamadım bu konuda yardımcı olursanız hazır proje olarak bir done olmuş olacak.Herkese iyi ç...

Sayın mrmarman özür dilerim hata bende bir önceki denememi eklemişim düzeltiyorum.diğer arkadaşlardan da özür dilerim doğru link aşağıdadır.
Link:
https://yadi.sk/d/7BiYnA7fi7hUh

Sayın mrmarman yukarıda bahsettiğiniz kodları strcopy ile başlayan bir kod yok ama sizin vermiş olduğunuz diğer kısmı yani olarak değiştirdim ama hata aynı yine

sorun ile ilgili kısımda bilgi vermeyi unuttum kusura bakmayın problem sol taraftan kopyalanacak klasörü sağ taraftan da kopyalanacak alanı seçerek yedekleme yaptırmaktı ama program hata vermeden çalışmasına rağmen kendimden kaynaklı hatadan dolayı kaynak dosya mevcut olmadığı için kopyalama yapılam...

Merhaba arkadaşlar öncelikle herkese kolay gelsin. benim yedekleme ile ilgili bir problemim var çıkamadım işin içinden.yardımcı olursanız sevinirim.Programın kaynaklarını ekte paylaşıyorum.incelenirse hatamın nerede olduğunu nasıl yapmam gerektiği hakkında bilgi verirseniz sevinirim yada düzeltip ek...

hatayıda yazsaydın iyi olurdu ben gördüğümü sölim, Query1.SQL.Add('SELECT * from rehber where Adi LIKE '+edit1.text+ %' OR Soyadi LIKE '% edit1.text %' yukardaki sorguda tek tırnak ve + işaretleri yanlış yazılmış doğrusu Query1.SQL.Add('SELECT * from rehber where Adi LIKE %'+edit1.text+'% OR Soyadi...

Merhaba sayın esistem vermiş olduğunuz kodları denedim aşağıdaki gibi,hata veriyor yanlış yapıyorum sanırım rica etsem ilgilenebilir misiniz ? Teşekkürler iyi çalışmalar. unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DBTables, DB, Grid...