pero me regresa nulo
delphi
function StringToStream(const AString: string): TStream; begin Result := TStringStream.Create(AString); end;
alguien que me pueda ayudar > . <
Posted 03 October 2014 - 01:27 PM
function StringToStream(const AString: string): TStream; begin Result := TStringStream.Create(AString); end;
Posted 03 October 2014 - 01:35 PM
function StringToStream(const AString: string): TStream; begin Result := TStringStream.Create(AString); end; procedure TForm1.Button5Click(Sender: TObject); begin memo1.Lines.LoadFromStream( StringToStream('hola changos') ); end;
Posted 03 October 2014 - 04:57 PM