Forum: Programmieren allgemein
by zeina,
15. Mai 2019
Danke an alle ...es Funktioniert:thumb:
Forum: Programmieren allgemein
by zeina,
15. Mai 2019
der MemoryStream wird in dieser Zeile gefüllt
if lGetRecord(lpTblGraph, 1) then
begin
{$IFDEF TITAN}
laImage := GetBlob(lpTblGraph);
{$ENDIF} // DEF TITAN
lmstImage.Clear;
lmstImage.Write(laImage, Length(laImage));
Forum: Programmieren allgemein
by zeina,
14. Mai 2019
was ist die Alternative für Tmemorystream:
FileHandle := FileOpen(Picture, fmOpenRead);
FileSeek(FileHandle, 0, 0);
FileRead(FileHandle, Buffer, 2);
FileClose(FileHandle);
Forum: Programmieren allgemein
by zeina,
14. Mai 2019
wie kann ich es machen?:|:|
Forum: Programmieren allgemein
by zeina,
14. Mai 2019
ich habe den Fehler(jpeg- fehler #53 ).
das Problem in mein Programm,dass ich keine Befehle finde ,mit der kann mein Programm die type von Bild(BItmap oder jpeg)anerkenn.
wie kann ich es als bedigung schreiben(if ___) ???