Delphi-PRAXiS
Seite 3 von 4     123 4      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi *.jpeg Datei erstellen (https://www.delphipraxis.net/15691-%2A-jpeg-datei-erstellen.html)

Stanlay Hanks 2. Feb 2004 21:27

Re: *.jpeg Datei erstellen
 
Hi hboy. Danke für die Erklärung, jetzt kapier ich das auch :thumb:

Man liest sich, Stanlay :hi:

Nils1984 2. Feb 2004 21:34

Re: *.jpeg Datei erstellen
 
nett nett und was soll ich jetzt tun??

hboy 2. Feb 2004 21:43

Re: *.jpeg Datei erstellen
 
kanns sein das du probleme mit den : aus der Zeit bekommst ?

Luckie 2. Feb 2004 21:45

Re: *.jpeg Datei erstellen
 
Zitat:

Zitat von Nils1984
soweit bin ich jez, aber da kommt immer ne Fehlermeldung wenn ich die Screenshottaste drück

Schön und jetzt? Veranstallten wir jetzt hier eine Ratestunde und derjenige, der die richtige Fehlermeldung errät, darf den Fehler auch gleich beheben oder ersparst du uns das ganze und verrätst uns den Fehler?

hboy 2. Feb 2004 21:46

Re: *.jpeg Datei erstellen
 
Delphi-Quellcode:
function validtime(s:string):string;
var
  i: integer;
begin
  for i := 1 to length(s) do
  if s[i] <>':'
    then result := result +s[i]
    else result := result +'_';
end;

Procedure Bild_Speichern;
Var Zeit :TDateTime;
    name :String;
    img: TPicture;
    Jpg: TJPEGImage;
    clip: TClipboard;
Begin
  Zeit := now;
  Clip := Clipboard;
  if clip.HasFormat(CF_BITMAP) then
  begin
    img := TPicture.create;
    Jpg := TJPEGImage.create;
    name := ('c:\'+'Bild von '+validTime(Timetostr(Zeit))+'.jpg');
    img.LoadFromClipboardFormat(CF_Bitmap,clip.GetAsHandle(CF_Bitmap),0);
    jpg.Assign(img.bitmap);
    jpg.CompressionQuality := 50;
    jpg.ProgressiveEncoding := true;
    jpg.Compress;
    jpg.SaveToFile(name);
    clip.clear;
    img.Free;
    jpg.Free;
  end;
End;
des tut. habs grad getestet

Nils1984 2. Feb 2004 21:47

Re: *.jpeg Datei erstellen
 
hab ich doch....

der : in der zeit, hmm, der wird in dateinamen nich akzeptiert da könntest du recht haben...

hmm, der QT den du da postest funzt bei mir net der selbe fehler WIE OBEN BESCHRIEBEN

Luckie 2. Feb 2004 21:48

Re: *.jpeg Datei erstellen
 
Zitat:

Zitat von Nils1984
ich hatte überlegt ob ich sie abschreiben soll, habs dann gelassen wil ich keinen bock hatte,aber wenn du soooo lieb fragst:

Und du erwartets von uns dass wir "Bock" haben rumzuraten, was es denn sein könnte um dir zu helfen? :evil: Ich hätte ja jetzt große Lust hier dicht zu machen, wenn du noch nicht mal bereit bist uns beim Helfen zu unterstützen, kann es ja wohl nicht sehr wichtig sein.

hboy 2. Feb 2004 21:50

Re: *.jpeg Datei erstellen
 
Zitat:

Zitat von Luckie
Zitat:

Zitat von Nils1984
ich hatte überlegt ob ich sie abschreiben soll, habs dann gelassen wil ich keinen bock hatte,aber wenn du soooo lieb fragst:

Und du erwartets von uns dass wir "Bock" haben rumzuraten, was es denn sein könnte um dir zu helfen? :evil: Ich hätte ja jetzt große Lust hier dicht zu machen, wenn du noch nicht mal bereit bist uns beim Helfen zu unterstützen, kann es ja wohl nicht sehr wichtig sein.

bist du immer so freundlich zu neulingen ? :|

Nils1984 2. Feb 2004 21:53

Re: *.jpeg Datei erstellen
 
Wenn du lieber freundlicher Luckie die beiträge richtig lesen würdest wäre dir auf gefallen das ich die entsprechende Fehlermldung bereits um 22:13 von mir Gepostet wurde in dem sinne :cheers:

hboy 2. Feb 2004 21:58

Re: *.jpeg Datei erstellen
 
kommentier doch mal die compression quality und das progressive encoding aus


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:56 Uhr.
Seite 3 von 4     123 4      

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz