Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
Es war eine sehr schwere geburt aber es funktioniert
Dank dir Tausendmal Matze für deine gedult
procedure TForm4.Button7Click(Sender: TObject);
var AlterPfad,NeuerPfad :string;
begin
if OpenDialog1.Execute then
begin
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
ok so stimmen jetzt die pfade aber er copiert nichts
begin
if OpenDialog1.Execute then
begin
AlterPfad := OpenDialog1.FileName;
NeuerPfad := ExtractFilePath(ParamStr(0))+('Bilder');
CopyFile(PChar(AlterPfad), PChar(NeuerPfad), true);
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
naja ganz klar es wird die datei von D:\eigenebilder in D:\eigenebilder\bilder kopiert obohl sie in einen anderen pfad muss der erste stimmt aber der zweite nicht.
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
ok ich gebe auf es funzt immer noch nicht der pfad mit dem ordner bilder ist da aber ich werde mal schauen ob ich es irgenwie hin bekomme will euch und dich nicht weiter nerven :(
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
es soll ja die datei aus dem opendialog z.b hallo.jpg in \bilder\ kopiert werden sodas dann steht \bilder\hallo.jpg
es tut mir echt leid wenn ich es gerade überhaupt nicht blicke
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
geht sowas nicht
CopyFile(PChar(ExtractFileName(OpenDialog1.FileName)), PChar(ExtractFileName('\Bilder'));
wie gesagt weil ich die datei aos dem Opendialog auswähle
es tut mir leid wenn ich nerve und es einfach ncht verstehe hab bald ne glatze weil mir vor lauter denken die haare ausfallen :lol:
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
ja versuche es ja gerade bekomm es aber nicht ganz hin
habe jetzt ein Problem mit PAsinChar
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
ja die bilder sin z.b in Eigenebilder drin jetzt soll über das opendialog das ausgewählte .jpg in \bilder copiert werden.
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
Mein bild was ich im opendialog auswähle soll in diesem ordner gespeichert werden
(ExtractFileName('\Bilder'));
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
ok habe es schon nur jetzt bekomme ich diesen fehler wenn ich auf die datei in der Listbox klicke
JPEG Fehler #53
was ist das
und so habe ich es jetzt gemacht
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
? komm gerade garnicht drauf kann es sein das ich das falsch dialog benutze
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
Die Bilder müssen aber über das Opendialog in einem dafür angelegten ordner gespeichert werden macht das opendialog das nicht automatisch
bei mir liegen die ordenr in diesem ordner auf den greift dann die FileListbox zu
Bilddat:= ExtractFilePath(ParamStr(0))+'\Bilder\'; //Pfad in Variable übergeben
FileListBox1.Directory:= Bilddat; //Laden des Ordners aus dem Pfad
muss man da...
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
Ich wurde gerne über den Button das Opendialog öffnen, ein .jpg aus einen belibigen Ordner auswählen und da in die listbox übernehmen
Forum: Object-Pascal / Delphi-Language
by SaFu,
27. Mai 2007
Hallo zusammen
habe ein kleines Problem
Ich lade über OpenDialog .jpg dteien in eine Listbox hatte mal fnktioniert aber jetzt auf einmal nicht mehr
Die datei die auswähle soll in die Listbox geladen werden was mache ich falsch
procedure TForm4.Button7Click(Sender: TObject);