Ibdataset şu an hangi mode da (inser,edit,...)

[ssteeltr]

arkadaşlar ıbdataset in herhangi bir anda hangi mod da oldugunu ve o anjki modu nasıl değiştirebilecegimi bilemiyorum yardımlarınız ihtiyacım var.

[Ali Erdoğan]

Datasource bileşeninin state özelliği ile durumu öğrenebilirsin.
Datasource

dsInactive, dsBrowse, dsEdit, dsInsert, dsSetKey,dsCalcFields, dsFilter, dsNewValue, dsOldValue, dsCurValue, dsBlockRead,dsInternalCalc,dsOpening

durumlarında bulunabilir.

[Uğur1982]

merhaba...

Kod: Tümünü seç

procedure TForm1.DataSource1StateChange
  (Sender: TObject);
var ds: string;
begin
 case ADOTable1.State of
  dsInactive: ds:='Closed';
  dsBrowse  : ds:='Browsing';
  dsEdit    : ds:='Editing';
  dsInsert  : ds:='New record inserting';
 else
  ds:='Other states'
 end;
 Caption:='ADOTable1 state: ' + ds;
end;

http://delphi.about.com/od/database/l/aa040301a.htm

iyi akşamlar...

[ssteeltr]

arkadaşlar öncelikle çevaplarınızdan dolayı teşekkürler dediklerinizi yaptım

Kod: Tümünü seç

 if (ibdataset1.state=dsedit) or if (ibdataset1.state=dsinsert) then
begin
end;

dediğim zaman

undeclarte identifier :'dsedit'

hatası veriyor !!!!

[mucit]

Merhaba,

Öncelikle aşağıdaki kod yanlış.

Kod: Tümünü seç

 if (ibdataset1.state=dsedit) or if (ibdataset1.state=dsinsert) then
begin
end;

Doğrusu

Kod: Tümünü seç

if (ibdataset1.state = dsedit) or (ibdataset1.state = dsinsert) then
begin
end;

şeklinde olmalı.

Ayrıca Uses kısmına DB unitini eklemelisin.

Kolay gelsin.

[Kuri_YJ]

Selamlar,

yada

Kod: Tümünü seç

  if tabla1.State in [dsEdit,dsInsert] then
  begin
    .
    .
    .
  end ;

diye de kullanabilirsiniz.

Kolay Gelsin