bmp speichern

[Alexander]

Ich hatte gerade mal kurz Zeit und habe es mit meinem Delphi mal nachgebaut (siehe Anhang). Bei mir funktioniert das wunderbar.
Kannst es ja mal bei dir kompilieren. Kannst ja auch mal versuchen, dass Bitmap direkt, nachdem der Screenshot geschossen wurde, zu speichern. Ohne Umweg über's Image. Dann weist du zumindest, ob es am TImage liegt.

[Nisbo]

welchen string einfügen ?
den code den ich verwende habe ich auf seite 1 gepostet, also wie ich den screenshot mache und wie das bild gespeichert wird, der letztere ist ja jetzt auf deinen code angepasst

btw habe ich Lazarus (wegen dem Code)

[Nisbo]

habe jetzt auch mal

Delphi-Quellcode:

// Screenshot
procedure TForm7.Button3Click(Sender: TObject);
var tempBild: TBitmap;
begin
   WindowState    := wsminimized;
   Image1.picture := nil;
   tempBild       := TBitmap.Create;
   Sleep(1000);
   ScreenShot(tempBild,Edit2.Text,Edit1.Text,Edit3.Text,Edit4.Text);
   Image1.Picture.Assign(tempBild);
   tempBild.SaveToFile('TestBitmap.bmp');
   tempBild.Free;
   WindowState    := wsNormal;
   Form7.BringToFront;
   SetForegroundWindow(FindWindow(nil,'Screenshot'));
end;

versucht, also das

tempBild.SaveToFile('TestBitmap.bmp');

eingefügt, wieder nen schwarzes bild
dein Programm funktioniert, muß also wohl doch an Lazarus liegen

EDIT:

du hast in uses noch das drinn:
, Messages, Variants

hatte das mal mit eingefügt und neu getestet, aber immer noch das selbe

[Alexander]

Funktioniert mein Programm nur als kompilierte Version oder kannst du auch das selber kompilieren? Dann funktioniert es nicht?
Wenn ich die richtig verstanden habe, dann scheint das wirklich ein Bug von L. sein. Bleiben dir zwei Möglichkeiten:
Schaun, ob du irgendwo günstig Delphi herbekommst oder kucken ob es bereits Bug-Fixes gibt. Den Bug würde ich auf jedenfall melden.

[Nisbo]

Ich kann das doch bei mir nicht öffnen das projekt, st doch von Delphi
gemeldet habe ich das schon, aber der Support dort ......
naja was sol man erwarten ist ja freeware

Delphi 5 Standard habe ich bereits am 20. März ersteigert
siehe topic hier:
http://www.delphipraxis.net/internal...ct.php?t=49787
na mal schauen wann es ankommt und ob dann alles funktioniert

[Alexander]

Ach so, ich dachte man könnte das importieren. Naja, wenn du so wieso Delphi bald hast

[Nisbo]

ja bald, und hoffentlich
hoffe mal das ich mit D5 auch das ganze umsetzen kann, nicht das es zu alt ist

[Alexander]

Zitat von Nisbo:

ja bald, und hoffentlich
hoffe mal das ich mit D5 auch das ganze umsetzen kann, nicht das es zu alt ist

Keine Angst, das wird auf jeden Fall klappen

[Nisbo]

Thema hat sich erledigt, mit Delphi 5 funktioniert es jetzt