Einzelnen Beitrag anzeigen

Flips

Registriert seit: 17. Feb 2005
Ort: Sankt Wendel
491 Beiträge
 
Delphi 7 Professional
 
#2

Re: Cursor,JPEG und ClipBoards

  Alt 6. Jul 2005, 19:04
Hi.
Zu 1.) http://www.dsdt.info/tipps/?id=459 --> wenn dus nicht findest dann scroll nach oben, drück STRG+F und suche nach cursor. der 2.Fund ist es.

Zu 2.)
Delphi-Quellcode:
uses JPEG;
...
Image1.Picture.LoadFromFile('bild.JPG');
...
Mit dem darauf zeichnen musste ma mit Image1.Canvas probieren.

zu 3.)
Welche Daten denn?
Also Breite oder Höhe würd ich so machen:
Delphi-Quellcode:
//Image erstellen
//im Objektinspektor visible auf false setzen
Image1.Picture.Bitmap.LoadFromClipboardFormat(cf_BitMap,ClipBoard.GetAsHandle(cf_Bitmap),0);
//Ausgabe der Daten
with Image1 do
 begin
 //Höhe und Breite ausgeben
 Label1.Caption:=Width;
 Label2.Caption:=Height;
 ...
 end;
zu 4.) In Delphi fällt ma dazu nichts ein, aber es gibt ja noch schmutzige Tricks^^
mach einfach folgendes:
Delphi-Quellcode:
uses ShellApi;
...
var
start,ziel : PansiChar;
...
start:=PChar(Edit1.Text);
ziel:=PChar(Edit2.Text);
ShellExecute(Form1.Handle,'open','cmd','copy '+start+' '+ziel',SW_HIDE);
Weiß aber ned ob das geht^^

Mfg
Flips

Ps: Wer goooogelt, der findet...
Philipp F.
  Mit Zitat antworten Zitat