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

if dbimage1.picture= nil then Dbimage1.visible:=false hier bleibt dbimage1 visible auf false ob bild drinne ist oder nicht

und auch

if clientdataset1.fieldbyname('Passbild').size <= 1 Then dbimage1.visible :=false und hier klappt es auch nicht

Was kann ich noch machen??

[Perlsau]

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?

Delphi-Quellcode:

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

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


[add]
Selbst beim IsNull würde dein Vorgehen nicht gehn.
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.