[델파이] EncodeBase64
공부방/Delphi / 2018. 4. 6. 10:53
uses Soap.EncdDecd;
(bpl : soaprtl240.bpl)
function EncodeFile(const FileName: string): AnsiString;
var
msStream: TMemoryStream;
begin
msStream := TMemoryStream.Create;
try
msStream.LoadFromFile(Filename);
Result := EncodeBase64(msStream.Memory, msStream.Size);
finally
FreeAndNil(msStream);
end;
end;
'공부방 > Delphi' 카테고리의 다른 글
| [델파이] delay (0) | 2018.04.06 |
|---|---|
| [델파이] SendMessage - String 으로 넘기기 (0) | 2018.04.06 |
| [델파이] 예외처리 구분 경우 (try/except/finally) (0) | 2017.06.08 |
| [델파이] 퀀텀그리드 짝수열 색상변경하기 (1) | 2016.03.10 |
| [델파이] Form 생성에 대한 정리 (0) | 2015.12.14 |