date

Veri tabanından çektiğiniz tarih tabanlı veriyi FieldByName().AsString komutunu kullanarak çevirebilirsiniz.

Mesela : 

    ShowMessage(Query.FieldByName('Tarih').AsString);

   

  hedefZaman = seyahatHedef.AddNewProDateEdit(VerticalScrollBox, 'hedefZaman');

  clComponent.SetupComponent(hedefZaman,'{

   "MarginBottom":900,

   "Width" :300, 

   "Height":40,

   "TextColor":"#12366b",

   "TextSize":18,

   "TextVerticalAlign":"center",

   "TextHorizontalAlign":"center",

   "TextBold":"yes",

   "BorderColor":"#ffffff",

   "RoundHeight":20,

   "RoundWidth":20,

   "BorderWidth":1,

   "BackGroundColor":"#f8f8f8"

   }');

  gunH = clGetStringTo(hedefZaman.Date,'.');

  yilH = clGetStringAfter(hedefZaman.Date, '.');

  ayH = clGetStringTo(yilH, '.');

  yilH = clGetStringAfter(yilH, '.');

  

  dogruTarihH = yilH + '-' + ayH + '-' + gunH;

void HedefKayit;

{

  try

    Clomosy.DBSQLiteQuery.SQL.Text = 'INSERT INTO Goals (goal_country, goal_city, goal_date, goal_place, goal_item) VALUES ('+QuotedStr(hedefUlke.Text)+', '+QuotedStr(hedefSehir.Text)+',

    '+QuotedStr(hedefZaman.Text)+','+QuotedStr(hedefGezi.Text)+','+QuotedStr(hedefEsya.Text)+')';

    Clomosy.DBSQLiteQuery.OpenOrExecute;

    ShowMessage('Seyahat Hedefleriniz Başarılı Bir Şekilde Eklenmiştir✅');

  except

    ShowMessage('Exception class: '+LastExceptionClassName+' Exception Message: ' +LastExceptionMessage);

  } 

}

void getData;

{

    try

    Qry = Clomosy.DBSQLiteQueryWith('SELECT goal_city, goal_date, goal_place, goal_item FROM Goals WHERE goal_country = '+ QuotedStr(hedefAra.Text));

    Qry.OpenOrExecute;

 

 for i = 0 to Qry.RecordCount-1   

 {

   hedefGoruntuleLabel.Text=

   ' Şehir Bilgi: ' + Qry.FieldByName('goal_city').AsString + #13#10

   ' Gezilecek Yerler Bilgi : '+ Qry.FieldByName('goal_place').AsString + #13#10

  '  Alıncak Eşyalar: ' +Qry.FieldByName('goal_item').AsString;

   

 }

 

  except

    ShowMessage('Exception class: '+LastExceptionClassName+' Exception Message: ' +LastExceptionMessage);

  } 

  

}