Sayfayı Yazdır | Pencereyi Kapat

Delphi IIF

Nereden Yazdırıldığı: Datakent
Kategori: Diğer bölümler
Forum Adı: Borland Delphi
Forum Tanımlaması: Borland Delphi ile ilgili soru / sorun / paylaşım bölümü
URL: http://forum.datakent.com/forum_posts.asp?TID=2307
Tarih: 28.Mart.2024 Saat 17:10


Konu: Delphi IIF
Mesajı Yazan: turknetyazilim
Konu: Delphi IIF
Mesaj Tarihi: 07.Subat.2012 Saat 23:55

Bir üstad benimle paylaştı.Ben sizinle...
Bildiğim kadarı ile "IIF" komutu firebird sql de var.Ve SQL server 2012'ye de ekleneceğini gördüm.




function iif(Condition: boolean; T, F: variant): variant;
begin
  if Condition then
    Result := T
  else
    Result := F;
end;

procedure TForm1.FormCreate(Sender: TObject);
var
 x,y:Integer;
begin
  x:=5;
  y:=6;
  Caption:=iif(x>y,'Doğrudur','Yanlıştır');
end;


Condition array olursa.Birden fazla şart parametre olarak geçilirse daha güzel olur düşüncesindeyim.
Vesselam 
Kolay Gelsin




Sayfayı Yazdır | Pencereyi Kapat