Zitat:
Delphi-Quellcode:
TJvCustomInspectorData.ItemRegister.
Add(TJvInspectorTypeInfoRegItem.Create(TJvInspectorPictureItem ,
TypeInfo(TPicture)));
Du setzt hier den Editor für den Typ TPicture
Nein das ist für mein Timage object
habe nur gesagt das ich damit auch Png einladen kann und meine frage war
warum muss ich dann ein neues erstellen für PNG..
Für Png habe ich es schon richtig definiert.
Delphi-Quellcode:
// TImage
TJvCustomInspectorData.ItemRegister.
Add(TJvInspectorTypeInfoRegItem.Create(TJvInspectorPictureItem ,
TypeInfo(TPicture)));
// Png
TJvCustomInspectorData.ItemRegister.
Add(TJvInspectorTypeInfoRegItem.Create(TJvInspectorPngImage,
TypeInfo(TPngObject)));
so geht es nun .. Danke für die Tips
Delphi-Quellcode:
procedure TJvInspectorPngImage.Edit;
begin
MainForm.dlgPicture.InitialDir := ExtractFilePath(Application.ExeName);
if MainForm.dlgPicture.Execute then
begin
PngImageFile := MainForm.dlgPicture.Filename;
TPngObject(Pointer(Data.AsOrdinal)).LoadFromFile(PngImageFile);
SkinManagerInterface.Modified := True;
end;
// ReInitialisiere Inspector Display Edit Button
InitEdit;
Inspector.Invalidate;
end;