DBimage wenn kein Bild dann

[Natcree]

Hallo Habe eine DBimage Komponennte und ein Clientdataset1 in dem auch Bilder in eine DB gespeichert werden nun mehr möchte ich wenn zu einem Datensatz kein Bild vorhanden ist dbimage1.visible :=false setzen. Ich habe schon versucht

Delphi-Quellcode:

if dbimage1.picture= nil then Dbimage1.visible:=false

hier bleibt dbimage1 visible auf false ob bild drinne ist oder nicht

und auch

Delphi-Quellcode:

if clientdataset1.fieldbyname('Passbild').size <= 1 Then dbimage1.visible :=false

und hier klappt es auch nicht

Was kann ich noch machen??

[Perlsau]

Delphi-Quellcode:

dbimag1.Visible := NOT clientdataset1.fieldbyname('Passbild').IsNull;

Siehe auch IsNull.

[Natcree]

Danke das war es .

[himitsu]

Ja, wenn du es nur auf False setz, wie soll es dann wieder auf True kommen? :roll:

Delphi-Quellcode:

if DBImage1.Picture = nil then 
  DBImage1.Visible := False
else
  DBImage1.Visible := True;

oder

Delphi-Quellcode:

DBImage1.Visible := Assigned(DBImage1.Picture);

[add]
Selbst beim IsNull würde dein Vorgehen nicht gehn.

Delphi-Quellcode:

if ClientDataSet1.FieldByName('Passbild').IsNull Then DBImage1.Visible := False;

[Natcree]

ich habe es in eine onchange methode vom dbedit1 gesetzt wenn ich jetz zum nächsten datensatz springe und dort ein bild enthalten ist setz er es nicht auf visible false.

[Perlsau]

Mach es besser mit der AfterScroll-Methode deines ClientDatasets. Sollte sich dein ClientDataSet in einem Datenmodul befinden, löst du dort ein ein entsprechendes Ereignis aus.

[Natcree]

japp habe ich gemacht Danke für den hinweis.