Ich habe seit 2 Tagen ein Problem
Ich lade mit FTp bilder hoch:
Code: Alles auswählen
nBuffer := directory(cFilename)[1][F_SIZE] // repräsentiert anzahl zeichen die das bild enthält
cContent := space(nBuffer+100000) // puffer bereitstellen für das eingelesene bild
nHandle := fOpen(cFileName) // bild öffnen
fRead(nHandle, @cContent, nBuffer)
oFtp:put( cFileOrt , cContent )
Kann mir da jemand ein Rat geben
Gruss Thomas