cxgrid içindeki seçili alanları excele aktarma
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
-
- Üye
- Mesajlar: 7
- Kayıt: 03 Oca 2008 08:55
cxgrid içindeki seçili alanları excele aktarma
cxgrid içindeki bilgilerden sadece seçtiğim kayıtları excel'e aktarmak istiyorum nasıl yapabilirim!!! yardımlarınız için teşekürler
parametreleri incelerseniz sadece secili alanlar konusunda yardımcı oluradd cxExportGrid4Link to your uses.
ExportGrid4ToExcel('SomeFileName.xls', SomeGrid, True, True);
In that same unit you will find
ExportGrid4ToHTML
ExportGrid4ToXML
ExportGrid4ToExcel
ExportGrid4ToText
rgds
Stephan Marais
Kişi odur ki, koyar dünyada bir eser. Eseri olmayanın yerinde yeller eser./Muhammed Hadimi
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
-
- Üye
- Mesajlar: 7
- Kayıt: 03 Oca 2008 08:55
Hocam dediğiniz olayları zaten ekliyorum excelede aktarabiliyorum fakat
benim istediğim tam olarak cxgrid içerisinde 10 yada daha fazla kayıt var
bunların içerisinden 2 yada 3 tanesini seçecem, excele aktar dediğim zaman sadece seçmiş olduğum kayıtları excele istediğim alanlara aktarabilmek!!!
cevabınız için çok teşekürler
benim istediğim tam olarak cxgrid içerisinde 10 yada daha fazla kayıt var
bunların içerisinden 2 yada 3 tanesini seçecem, excele aktar dediğim zaman sadece seçmiş olduğum kayıtları excele istediğim alanlara aktarabilmek!!!
cevabınız için çok teşekürler
-
- Üye
- Mesajlar: 7
- Kayıt: 03 Oca 2008 08:55
hocam fonksiyonları inceledim fakat bir türlü çözüm bulamadım..
cxgrid üzerinde multiselect fonksiyonlarını açıyorum istediğim kaydı seçiyorum fakat kodlamı yapacam sadece fonksiyon ile çözebilirmiyim bilmiyorum!!! kullanmış olduğum kod bu şekilde
begin
v:=CreateOLeObject('Excel.Application');
v.workbooks.open(cxmemo4.Text);
r:=v.activeworkbook.worksheets[1].cells[1];
d:=4;
while not dm.iplik_kalite_dset.Eof do
begin
r.cells[11,d]:=dm.iplik_kalite_dset.FieldByName('HARMAN').AsString;
r.cells[12,d]:=dm.iplik_kalite_dset.FieldByName('NAZARI_NE').AsString;
r.cells[13,d]:=dm.iplik_kalite_dset.FieldByName('TUYLULUK').AsString;
dm.iplik_kalite_dset.Next;
d:=d+2;
v.Visible:=True;
end;
cxgrid üzerinde multiselect fonksiyonlarını açıyorum istediğim kaydı seçiyorum fakat kodlamı yapacam sadece fonksiyon ile çözebilirmiyim bilmiyorum!!! kullanmış olduğum kod bu şekilde
begin
v:=CreateOLeObject('Excel.Application');
v.workbooks.open(cxmemo4.Text);
r:=v.activeworkbook.worksheets[1].cells[1];
d:=4;
while not dm.iplik_kalite_dset.Eof do
begin
r.cells[11,d]:=dm.iplik_kalite_dset.FieldByName('HARMAN').AsString;
r.cells[12,d]:=dm.iplik_kalite_dset.FieldByName('NAZARI_NE').AsString;
r.cells[13,d]:=dm.iplik_kalite_dset.FieldByName('TUYLULUK').AsString;
dm.iplik_kalite_dset.Next;
d:=d+2;
v.Visible:=True;
end;
cxgridin source varise kodlardan bu fonksiyona bakın. orda anlatıyordur...
kodlardan gördüğüm kadarı ile ring yada oe tarzı bir iplik işletmesi var ortada.
eğer kod bu kadar acil ise forumda daha önce attığım stringgridden excele atan bir kod var. arama yaparsanız ve işiniz acilse oda iş görebilir.
çeşitli kod ipuçları diye 14 sayfalık bir topic
kodlardan gördüğüm kadarı ile ring yada oe tarzı bir iplik işletmesi var ortada.
eğer kod bu kadar acil ise forumda daha önce attığım stringgridden excele atan bir kod var. arama yaparsanız ve işiniz acilse oda iş görebilir.
çeşitli kod ipuçları diye 14 sayfalık bir topic
Kişi odur ki, koyar dünyada bir eser. Eseri olmayanın yerinde yeller eser./Muhammed Hadimi
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
Bir yerden buldum. Procedure'ün tanımı şöyle :
procedure ExportGrid4ToExcel(const AFileName: string; AGrid: TcxGrid; AExpand: Boolean = True; ASaveAll: Boolean = True; AUseNativeFormat: Boolean = True; const AFileExt: string = ‘xls’);
Bu ASaveAll parametresini False verirsen sadece seçilen kayıtları aktarır.
Kolay gelsin.
procedure ExportGrid4ToExcel(const AFileName: string; AGrid: TcxGrid; AExpand: Boolean = True; ASaveAll: Boolean = True; AUseNativeFormat: Boolean = True; const AFileExt: string = ‘xls’);
Bu ASaveAll parametresini False verirsen sadece seçilen kayıtları aktarır.
Kolay gelsin.
Sağlam kaynakmış usta:))mussimsek yazdı:Bir yerden buldum. Procedure'ün tanımı şöyle :
procedure ExportGrid4ToExcel(const AFileName: string; AGrid: TcxGrid; AExpand: Boolean = True; ASaveAll: Boolean = True; AUseNativeFormat: Boolean = True; const AFileExt: string = ‘xls’);
Bu ASaveAll parametresini False verirsen sadece seçilen kayıtları aktarır.
Kolay gelsin.
Bende bu arada threadi kaydedip kod bankasına alıverdim.
Kişi odur ki, koyar dünyada bir eser. Eseri olmayanın yerinde yeller eser./Muhammed Hadimi
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
-
- Üye
- Mesajlar: 7
- Kayıt: 03 Oca 2008 08:55
Bu cxGrid ile gelen bir procedure. Uses kısmına "cxExportGrid4Link" unitini ekleyip, bu procedure'ü kullanarak, sadece seçili kayıtları veya tüm gridi excel dosyası olarak kaydedebilirsin.okansaritas44 yazdı:Hocam procedür içerisinde yapmam gerekiyor herhalde anladığım kadarıyla yanlışmı anladım bilmiyorum.
halen çözemedim olayı
yardımlarınız için çok teşekür ediyorum.
Kolay gelsin.
Re: cxgrid içindeki seçili alanları excele aktarma
merhabalar çok eski bir konu ama yazmak zorunda kaldım,
uses'a cxExportGrid4Link eklediğimde hata veriyor, "cannot resolve unit name" diyor.
frxxlsexport kullandığımda ise "invalid variant operation" hatası alıyorum. excele başka türlü nasıl aktarım sağlayabilirim.
Sorun Versiyon Farkındanmış / Güncellemeleri yapınca düzeldi...
uses'a cxExportGrid4Link eklediğimde hata veriyor, "cannot resolve unit name" diyor.
frxxlsexport kullandığımda ise "invalid variant operation" hatası alıyorum. excele başka türlü nasıl aktarım sağlayabilirim.
Sorun Versiyon Farkındanmış / Güncellemeleri yapınca düzeldi...