bir gridden diğer gride aktarma

[huseyinert]

Merbaba,
dbgridde listelenen 23 tane alanım var bunlardan başlığı tıknanlarımın 2.dbgride aktarılması istiyorum bir türlü yapamadım yardımcı oabilir misiniz?
2.db gridle 1.dbgdrid aynı datasource bağlı olacak onda listelenen kayıtlarn hangi başlık tıkladıysa başlık ve kayıtlar olarak 2.gride listelenmesini istiyorum...

teşekkürler..

[zengin]

anladığım kadarı ile table birin içinde ( a ) alanı ( be ) alana taşımak istiyorsun ?

table1.edit;
table1acıklama.text:=table1not.text;

[mustafasoy]

iki grid aynı datasource bağlandığında ikisindede aynı veriler listelenir , bunu hangi amaçla istiyorsunuz?
procedure TForm1.dbgrid1TitleClick(Column: TColumn);
begin
ShowMessage(dbgrid1.Fields[Column.Index].FieldName);
end;
tıkladığınız kolonun adını yada index bilgisini yakayabilirsiniz sonrasında bir döngü ile iligli kolonun içeriğini başka bir datasete yada nesneye kopyalabilirsiniz

[huseyinert]

hocam yapmak istediğimi şöyle özetleyeyim;

şimdi listelenen bir gridim var bu gridde 23 tane field var bunlardan balıklarına tıkladıklarımı ayrı bir yerde tutum başlıkları tıklananları excele aktarmak istiyorum... şuan itibariyle başlığa tıklanınca listvoxa başlık olarak attıp bir döngüyle listboxta başlık adı geçen field dataset-dbgridde eşleştirip bunları excele aktarmak kaldı fakat bu döngü yapısını bir türlü kuramadım... yardımlarınız için şimdiden teşekkürler...

[xozcanx]

Tek bir ricam var mantığını kavra. Anlamadığın noktaları herzaman gelip sorabilirsin, memnuniyetle cevaplanır,,

DbGrid2'de hiçbir Alan eklemesi yapmıyorsun,,

Kod: Tümünü seç

  
procedure TForm1.DBGrid1TitleClick(Column: TColumn);
begin
  With DBGrid2.Columns.Add do
  Begin
    FieldName:=dbgrid1.Fields[Column.Index].FieldName;
    Title.Caption:=dbgrid1.Columns[Column.Index].Title.Caption;
  End;
end;  

İyi Çalışmalar.