Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by glkgereon,
15. Jun 2005
gemotzt wird bei folgendem code aus der JvIDv3Base (Zeile 7210)
procedure TJvID3PictureFrame.AssignTo(Dest: TPersistent);
var
TmpFileName: string;
begin
if (Dest is TPicture) or (Dest is TGraphic) then
begin
if (DataSize > 0) and (MIMEType <> cURLArrow) then
begin
TmpFileName := JclFileUtils.FileGetTempName(cPictureFrameFileNameTemplate);
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by glkgereon,
15. Jun 2005
Hi
ich will alle mp3's aus einem Ordner holen und deren Gesamtlaufzeit (fürs erste) ausrechnen.
grundsätzlich funktioniert auch alles
ich nutze folgenden Code:
procedure FindAllFiles;
//Wie in Codelib
//nur RootFolder:=IncludeTrailingPathDelimiter(RootFolder);
//statt IncludeTrailingPathDelimiter(RootFolder);