Merhaba,
JVBERi0xLjQKMSAwIG9iago8PAovVGl0bGUgKP7/AGUALQBGAGEAdAB1AHIAYSkKL0NyZWF0b3IgKP7/AHcAawBoAHQAbQBsAHQAbwBwAGQAZgAgADAALgAxADIAL ....
Binary bir veriyi pdf olarak nasıl kayıt edebiliriz?
İyi çalışmalar..
Çözdüm.
JVBERi0xLjQKMSAwIG9iago8PAovVGl0bGUgKP7/AGUALQBGAGEAdAB1AHIAYSkKL0NyZWF0b3IgKP7/AHcAawBoAHQAbQBsAHQAbwBwAGQAZgAgADAALgAxADIAL ....
Binary bir veriyi pdf olarak nasıl kayıt edebiliriz?
İyi çalışmalar..
Çözdüm.
var MStream:TMemoryStream; Decoder:TIdDecoderMIME; Base64: string; begin Decoder := TIdDecoderMIME.Create(nil); try MStream := TMemoryStream.Create; try Base64 := 'JVBERi0xLjQKMSAwIG9iago8PAov binary verisi'; Decoder.DecodeStream(Base64, MStream); MStream.SaveToFile(Yerel); finally FreeAndNil(MStream); end; finally FreeAndNil(Decoder); end; end;