Einzelnen Beitrag anzeigen

Benutzerbild von BlackJack
BlackJack

Registriert seit: 2. Jul 2005
Ort: Coesfeld
246 Beiträge
 
Delphi 2005 Personal
 
#3

Re: LoadFromFile Stream-Lesefehler bei > 63*63px ? ...wie

  Alt 6. Aug 2005, 10:59
Zitat von integer:
Delphi-Quellcode:
procedure TForm1.BitBtn_loadimageClick(Sender: TObject);
begin
  with TOpenPictureDialog.Create(form1) do
  try
    filter := 'Bitmaps(*.bmp)|*.bmp|Alle Dateien(*.*)|*';
    Options := [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing];
    if Execute then
    begin
      form1.img_original.Picture.LoadFromFile(FileName);

und so weiter...
tut zwar nichts zur sache, aber benutz bitte mal in dem Code "Self" statt "Form1".
wenn du Form1 nimmst, legst du dich explizit auf diese eine Objekt (d.h. diese eine Variable mit genau diesem Namen) fest, mit Self wird immer das aufrufende Objekt angesprochen.

edit: und wie schon gesagt, den OpenDialog kannst du auch von Delphi automatsich erstellen lassen, der kümemrt sich dann auch ums freigeben etc. (hast du da überhaupt dran gedacht?)
See my shadow changing, stretching up and over me.
Soften this old armor. Hoping I can clear the way
By stepping through my shadow, coming out the other side.
Step into the shadow. Forty six and two are just ahead of me.
  Mit Zitat antworten Zitat