Sayfa: [1]   Aşağı git
  Yazdır  
Gönderen Konu: Excel'den Paradox'a veri aktarımı  (Okunma Sayısı 519 defa)
0 Üye ve 1 Ziyaretçi konuyu incelemekte.
JoKeR
Rock On Roal
Administrator
*


Karma: 112
Offline Offline

Cinsiyet: Bay
Mesaj Sayısı: 1264


Üyelik Bilgileri


« : 02 Nisan 2008, 21:46:20 »





procedure TForm1.BitBtn1Click(Sender: TObject);
var
  RowN: Integer;
  Deger: String;
begin
  for RowN:= 2 to F1Book1.LastRow do
  begin
   with Table1 do
   begin
      {$I+}
      Deger:= F1Book1.TextRC[RowN,1];
      if FindKey([StrToInt(Deger)]) then Edit else Append;
      FieldByName('SiraNo').Value:= StrToInt(F1Book1.TextRC[RowN,1]);
      FieldByName('MusAd').Value:= F1Book1.TextRC[RowN,2];
      if F1Book1.TextRC[RowN,3] = '' then
       FieldByName('MusSoyad').Value:= ','
      else FieldByName('MusSoyad').Value:= F1Book1.TextRC[RowN,3];
      Table1.Post;
   end;
  end;
end;
Logged

10 Konusu Olmayan Soru Sormasın Soruları Cevaplanmayacak...

Linklerin Görülmesine Izin Verilmiyor
Linki Görebilmek Için Üye Ol veya Giris Yap
NeverFear
Acemi Üye
**


Karma: 0
Offline Offline

Cinsiyet: Bay
Mesaj Sayısı: 29


Üyelik Bilgileri


« Yanıtla #1 : 02 Ağustos 2008, 01:01:09 »

JoKeR arkadaşıma .!
24/07/2004 tarihinde ismimi de yazarak Delphi Türk Kodbank ve Delphi Türkiye Makale kısmına gönderdiğim "Excel'den Paradox'a aktarım" konu başlıklı yazımı burada yayınladığın için teşekkür ederim. Bilgi paylaşıldıkça değer kazanır. Ancak kaynakça gösterseydin ve kullanıcılar için daha sonra gönderdiğim ekleri de buraya ekleseydin daha iyi olurdu düşüncesindeyim. Yanılıyor muyum?

İşini görmesi dileğimle,
Çalışmalarında başarılar dilerim.

NeverFear - Linklerin Görülmesine Izin Verilmiyor
Linki Görebilmek Için Üye Ol veya Giris Yap
Logged
YuKo_CaN
קєรเ๓เรt
Master Üye
******


Karma: 104
Offline Offline

Cinsiyet: Bay
Mesaj Sayısı: 2052

PeSiMiST


Üyelik Bilgileri


« Yanıtla #2 : 02 Ağustos 2008, 09:01:17 »

NeverFear  delphiTürk e bakacam aynı konu bu şekilde varsa alıntı link eklenecek altına
Logged

Linklerin Görülmesine Izin Verilmiyor
Linki Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap

Linklerin Görülmesine Izin Verilmiyor
Linki Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap

Linklerin Görülmesine Izin Verilmiyor
Linki Görebilmek Için Üye Ol veya Giris Yap
Resimlerin Görüntülenmesine Izin Verilmiyor
Resimleri Görebilmek Için Üye Ol veya Giris Yap
NeverFear
Acemi Üye
**


Karma: 0
Offline Offline

Cinsiyet: Bay
Mesaj Sayısı: 29


Üyelik Bilgileri


« Yanıtla #3 : 05 Ağustos 2008, 00:47:26 »

YuKo_CaN, mail adresine gönderdiğim linkleri tıklaman yeterli. ayrıca, JoKeR ile bu konu ve diğer bazı durumlarla ilgili olarak yaptığımız görüşmeden sonra sitenize de her zaman kod gönderme konusunda yardımcı olmaya karar verdiğimi anlattım. umarım herkes için faydalı olurum ve profilime bakmanı da öneririm.
Logged
Sayfa: [1]   Yukarı git
  Yazdır  

 
Gitmek istediğiniz yer: