-
等级
本版专家分：0结帖率 55.56% -
将一字符串要保存为二进制文件，又能将二进制文件读取出来还原成这个字符串，该怎么做？展开阅读全文
-
等级
本版专家分：13605勋章
-
- 红花 2009年9月 Delphi大版内专家分月排行榜第一
-
- 蓝花 2009年10月 Delphi大版内专家分月排行榜第三
-
-
Private Function B2T(bt() as Byte) as String
Dim strDesc As string
Dim I As Integer
For i=0 to Ubound(bt)
strDesc=strDesc & Rihgt("00" & Hex(bt(i)),2)
Next i
B2T=strDesc
End Function
Private Function T2B(strSrc as string) as Variant
Dim bLen as integer
Dim bt() as byte
Dim i as Integer
bLen=len(strSrc)/2
ReDim bt(bLen-1)
for i=0 to bLen
bt(i)=Val("&H" & Mid(strSrc, i*2, 2))
Next i
T2B=bt
End Sub
-
等级
本版专家分：74099勋章
-
- 进士 2008年 总版技术专家分年内排行榜第九
-
-
红花
2009年1月 C++ Builder大版内专家分月排行榜第一
2008年12月 Delphi大版内专家分月排行榜第一
2008年11月 Delphi大版内专家分月排行榜第一
2008年10月 Delphi大版内专家分月排行榜第一
2008年6月 Delphi大版内专家分月排行榜第一
2008年1月 Delphi大版内专家分月排行榜第一
2005年7月 C++ Builder大版内专家分月排行榜第一
-
-
黄花
2009年1月 Delphi大版内专家分月排行榜第二
2008年12月 C++ Builder大版内专家分月排行榜第二
2008年7月 Delphi大版内专家分月排行榜第二
2005年7月 Delphi大版内专家分月排行榜第二
-
-
蓝花
2009年5月 Delphi大版内专家分月排行榜第三
2009年4月 Delphi大版内专家分月排行榜第三
2009年3月 Delphi大版内专家分月排行榜第三
2009年2月 C++ Builder大版内专家分月排行榜第三
2009年2月 Delphi大版内专家分月排行榜第三
2008年11月 C++ Builder大版内专家分月排行榜第三
2008年8月 C++ Builder大版内专家分月排行榜第三
2008年7月 C++ Builder大版内专家分月排行榜第三
2008年6月 C++ Builder大版内专家分月排行榜第三
2008年5月 Delphi大版内专家分月排行榜第三
2005年8月 C++ Builder大版内专家分月排行榜第三
-
-
procedure SaveToFile(const Src: AnsiString;const FileName: AnsiString);
var
memstrm: TMemoryStream;
begin
memstrm := TMemoryStream.Create;
try
memstrm.WriteBuffer(PAnsiChar(Src)^,Length(Src));
memstrm.SaveToFile(FileName);
finally
memstrm.Free;
end;
end;
function ReadFromFile(const FileName: AnsiString): AnsiString;
var
memstrm: TMemoryStream;
begin
memstrm := TMemoryStream.Create;
try
memstrm.LoadFromFile(FileName);
SetString(Result,PAnsiChar(memstrm.Memory),memstrm.Size);
finally
memstrm.Free;
end;
end;
-
等级
本版专家分：0
-
楼上的兄弟，按你的方法保存的文件能用记事本打开看到其中的内容啊
-
等级
本版专家分：0
-
我的意思是这样，有一个字符串'aabbcc',将这个字符串写进一个二进制文件中，用记事本打开看到的应该是乱码，然后能从这个二进制文件再能将这个字符串读回来
-
等级
本版专家分：74099勋章
-
- 进士 2008年 总版技术专家分年内排行榜第九
-
-
红花
2009年1月 C++ Builder大版内专家分月排行榜第一
2008年12月 Delphi大版内专家分月排行榜第一
2008年11月 Delphi大版内专家分月排行榜第一
2008年10月 Delphi大版内专家分月排行榜第一
2008年6月 Delphi大版内专家分月排行榜第一
2008年1月 Delphi大版内专家分月排行榜第一
2005年7月 C++ Builder大版内专家分月排行榜第一
-
-
黄花
2009年1月 Delphi大版内专家分月排行榜第二
2008年12月 C++ Builder大版内专家分月排行榜第二
2008年7月 Delphi大版内专家分月排行榜第二
2005年7月 Delphi大版内专家分月排行榜第二
-
-
蓝花
2009年5月 Delphi大版内专家分月排行榜第三
2009年4月 Delphi大版内专家分月排行榜第三
2009年3月 Delphi大版内专家分月排行榜第三
2009年2月 C++ Builder大版内专家分月排行榜第三
2009年2月 Delphi大版内专家分月排行榜第三
2008年11月 C++ Builder大版内专家分月排行榜第三
2008年8月 C++ Builder大版内专家分月排行榜第三
2008年7月 C++ Builder大版内专家分月排行榜第三
2008年6月 C++ Builder大版内专家分月排行榜第三
2008年5月 Delphi大版内专家分月排行榜第三
2005年8月 C++ Builder大版内专家分月排行榜第三
-
-
文本文件也是二进制文件。如果你是希望别人读取到的内容不是原始的内容，那就是加密和解密的过程。
-
等级
本版专家分：3624 -
呵呵，楼主的意思有点像BASE64编码（或其他加密算法）了。
-
等级
本版专家分：1576 -
楼主原意是想加密解密的吧。。。。。。。。
-
等级
本版专家分：12304
-
给你一段以前用过的代码，大概 是你说的意思
转换为16进制写入到文件，打开后再读取转换回来
function TFrmMenu.AnsiToUnicode(Ansi: Variant): string; //ANSI转换为 Unicode码
var s:string;
i:integer;
t:widestring;
h,l:byte;
begin
s:='';
t:=widestring(Ansi);
for i:=1 to length(t) do
begin
h:=hi(ord(t[i]));
l:=lo(ord(t[i]));
s:=s+inttohex(h,2)+inttohex(l,2);
end;
Result:=s;
end;
//写入文件
procedure TFrmMenu.WriteBuf(BufTemp: string; Strlen: integer);
var Txtstr:string;
j:integer;
Temp:char;
StreamStr:TMemoryStream;
begin
for j:=0 to Strlen-1 do
begin
if (j mod 2 = 0) or (j=0)then
begin
TxtStr:=copy(BufTemp,j+1,2);
if Txtstr='' then
TxtStr:='00';
Temp:=char(strtoint('$'+TxtStr));
StreamStr.WriteBuffer(Temp,1);
end;
end;
end;
//读取
function GetFileBin(const AFileName: String;OffsetAdd:integer;ReadLength:integer): String;
var
FS: TFileStream;
Str: String;
FByte: Byte;
i: Integer;
begin
if FileExists(AFileName) then
begin
FS := TFileStream.Create(AFileName, fmOpenRead);
if FS.Size > 0 then
begin
FS.Seek(OffsetAdd,soFromBeginning);
for i := 1 to ReadLength do
begin
FS.Read(FByte, 1);
if length(IntToHex(FByte, 1))=1 then
Str := Str + '0' + IntToHex(FByte, 1) +' '
else
Str := Str + IntToHex(FByte, 1) +' ';
end;
end;
FS.Free;
end;
Result := Str;
end;
//转换
function TFrmMenu.UnicodeToAnsi(Unicode: string): Variant;
var s,test:string;
str:Widestring;
i:integer;
j,k:string[2];
Temp: Variant;
begin
i:=1;
s:='';
while i<Length(Unicode)+1 do
begin
j:=Copy(Unicode,i+2,2);
k:=Copy(Unicode,i,2);
i:=i+4;
s:=s+Char(ReadHex(j))+Char(ReadHex(k));
end;
if s<>'' then
s:=WideCharToString(PWideChar(s+#0#0#0#0))
// WideCharToStrVar(PWideChar(s+#0#0#0#0),test)
else
s:='';
str:=s;
Temp := s;
Result:=Temp;
end;
-
等级
本版专家分：0
-
楼上的兄弟，把readhex函数也贴出来吧，谢谢
-
等级
本版专家分：472 -
考,你加密不就完了.
或者用delphi的zlib对文件进行压缩,读取时再解压,文件内容绝对是乱码.
- 随机森林MATLAB代码
随机森林分类方法的matlab代码实现，包括分类、重要度打分和回归。
- STM32Cube和HAL库使用初体验-第5季第2部分
本季课程主要讲解STM32的全新开发方式：使用STM32CubeMX工具做图形化配置，自动生成初始化代码；添加各种中间件；使用HAL库和LL库来操作外设。结合朱老师物联网大讲堂专为nbiot物联网开发而设计的NB476开发板，本季课程能够让大家彻底掌握物联网时代以nbiot和低功耗STM32L4单片机为代表的典型开发模式，实战意义非常重要。 本课程是《朱有鹏老师单片机完全学习系列课程》第5季第2个课程，本部分以时钟和GPIO模块为案例来讲解STM32CubeMX工具加HAL库加MDK5这套开发体系的流程、技术细节，目标是让大家真正入门HAL库方式开发STM32单片机。后续再接着讲其他更复杂外设。
- 核主成分分析法matlab源代码
核主成分分析法 matlab源代码，非常好的一个例子
- 微信公众平台开发入门
本套课程的设计完全是为初学者量身打造，课程内容由浅入深，课程讲解通俗易懂，代码实现简洁清晰。通过本课程的学习，学员能够入门微信公众平台开发，能够胜任企业级的订阅号、服务号、企业号的应用开发工作。 通过本课程的学习，学员能够对微信公众平台有一个清晰的、系统性的认识。例如，公众号是什么，它有什么特点，它能做什么，怎么开发公众号。 其次，通过本课程的学习，学员能够掌握微信公众平台开发的方法、技术和应用实现。例如，开发者文档怎么看，开发环境怎么搭建，基本的消息交互如何实现，常用的方法技巧有哪些，真实应用怎么开发。 通过合理的课程设计，结合讲师多年的教学经验、微信开发经验，轻松引导初学者掌握微信公众平台开发。
- Matlab神经网络及应用于近红外光谱的汽油辛烷值预测
BP神经网络与RBF神经网络的MATLAB实现辛烷值的预测报告，并附有源代码
- ArcGIS for JavaScript
全面介绍ArcGIS for JavaScript 开发 让大家学会ArcGIS for JavaScript 开发
- 深度学习在机场能见度预测中的应用
本文利用乌鲁木齐国际机场2007年至2016年的小时观测值，通过深度学习方法建立了机场能见度的回归预测模型。 从结果我们可以看到：每小时能见度的绝对误差为706 m。 当能见度≤1000 m时，绝对误差为325 m，该方法可以预测能见度的趋势。 因此，我们可以使用此方法为将来的航空气象服务提供机场能见度的客观预报指导产品。 本文以乌鲁木齐地区为研究对象，探讨在天气预报应用领域的学习深度，为天气预报人员提供新的能见度回报预报，从而提高能见度水平，以确保机场的安全稳定运行。
- 华为机考题库(全）
包括招聘的机考题，及面试过程中会问到的数据结构的相关内容，排序算法全部包括并且有改进算法，一点点改进可以让你表现的与众不同，如果好的话给点评价吧亲
- 基于主成分分析与BP神经网络的雾天能见度等级预报
基于主成分分析与BP神经网络的雾天能见度等级预报，黄政，包云轩，本文利用江苏省昆山市2012-2014年逐时常规气象观测数据、空气质量监测数据和能见度数据，分析了雾天能见度与各要素的相关性，并通过
- 2020年最新版学习资料.txt
谷粒商城-2020年5月最新升级版，全套学习资料-微服务项目实战！！！
- Matlab数据降维工具箱
Matlab Toolbox for Dimensionality Reduction Matlab数据降维工具箱，包括几乎所有的数据降维方法：PCA、LDA、ICA、MDS、Isomap、LandmarkIsomap、LLE、LLC、Laplacian、HessianLLE、LTSA、DiffusionMaps、KernelPCA、KernelLDA、SNE、NPE、LPP、SPE、LLTSA、SPCA、CCA、MVU、FastMVU、AutoEncoder、AutoEncoderEA
- 2020数学建模A题
2020数学建模国赛A题及其数据 2020数学建模国赛A题及其数据2020数学建模国赛A题及其数据 2020数学建模国赛A题及其数据 2020数学建模国赛A题及其数据 2020数学建模国赛A题及其数据 2020数学建模国赛A题及其数据
- 智鼎(附答案).zip
并不是完整题库，但是有智鼎在线2019年9、10、11三个月的试题，有十七套以上题目，普通的网申行测题足以对付，可以在做题时自己总结一些规律，都不是很难
- 主成分分析法matlab源代码
用MATLAB实现的主成分分析法，有数据，可直接运行
- 简单网络管理协议SNMP通讯基础篇
本课程主要对SNMP的发展历史、专业术语、应用场景、网络结构的解读， 对SNMP通讯过程所涉及的MIB、PDU格式、对象的数据类型、通讯原语、TLV进行深入解读， 接下来实践SNMP的通讯过程并分析所产生的请求和响应报文。 课程特点：1、实操为主，理论讲解为辅； 2、避开难懂的概念，通俗化讲解； 3、通过实例操作理解SNMP； 较快掌握SNMP的基本原理及SNMP通讯过程包的分析方法，为网络工程师、相关研发人员、技术人员及感兴趣的人士提供有价值的参考。
- windows批处理教程
教程共7个课时，批处理（Batch）通常被认为是一种简化的脚本语言，它应用于DOS和Windows系统中，它是由DOS或者Windows系统内嵌的解释。批处理文件具有.bat或者.cmd的扩展名。为什么我们需要用批处理呢？实际上，在很多情况下，批处理的效率要远远高于图形用户界面，批处理还有一个优点，就是它可以使用很多图形用户界面没有的工具。后一个优点，就是它逼哥高，一次执行，必有回响。 掌握windows批处理编程
- 利用小波变换梯度计算能见度，包含实现的工程代码及相关文献
这个算法基于的文章是《改进的基于图像边缘的能见度反演方法》，利用小波变换计算图像梯度，并把梯度平方和作为特征，计算能见度。 Vsibility_TempletImg工程主要是确定图像感兴趣区域，利用mfc抓取的方法确定坐标点，基于vs2010和opencv。 shearlet_matlab是基于matlab中的shearlet时域变换完成的。 最后的结果不是特别理想，可能和采集的图片也有很大的关系。
- 基于支持向量机的P300脑电信号分类研究
基于支持向量机的P300脑电信号分类研究-吕竟雷 本文针对P300脑电信号的特点，通过P300仿真信号和国际标准实验信号， 对支持向量机分类识别P300脑电信号进行了研究。研究结果显示，支持向量机 对P300仿真信号具有很高的识别率和识别速度;对于真实P300脑电信号，在 标准识别方案的基础上，通过多次信号平均和参数优化，并采用整个训练集进 行分类器的训练，识别率达到90. 3%，满足了识别性能要求。值得一提的是， 在分类识别过程中，仅仅采用了15个通道的采样数据和较少的预处理(总通道 数:64 )，识别速度比较快。
- matlab2020a下载地址.txt
最新的matlab软件的下载地址，推荐配合我的博客一起看。
- 脑机接口系统中EEG信号特征提取与分类
脑机接口系统中EEG信号特征提取与分类，CSP算法
- 数据结构基础系列(1)：数据结构和算法
数据结构课程是计算机类专业的专业基础课程，在IT人才培养中，起着重要的作用。课程按照大学计算机类专业课程大纲的要求，安排教学内容，满足需要系统学习数据结构的人。系列课程包含11个部分，本课为第1部分，介绍与数据结构、程序、算法相关的概念，训练初步的数据逻辑结构表达能力，和初步的算法分析能力。 系列课程的目标是帮助学习者系统掌握数据结构课程的相关知识，具备利用这些知识分析问题、解决问题的能力。课程提供视频、课件、例程、自测、实践要求、参考解答等整套的解决方案，帮助学习者达到目标。本课是系列课程中的第1部分，具体目标包括：了解数据结构在计算机类人才培养中的重要意义、掌握数据结构的基本概念、掌握数据结构的分类、理解抽象数据类型ADT及其作用，以及初步学会算法分析的“套路”。
- BP神经网络预测超详细
基于BP神经网络，测试集辛烷值含量预测结果对比
- SAP FIORI开发入门
【课程目标】打造一个简单实用的 SAP FIORI 入门开发课程，帮助广大 SAP 技术人员或者希望进入 SAP 技术领域的人打开一扇门。 【课程形式】视频教程 + PDF 参考资料 【学习门槛】零门槛，无需任何额外知识 【作者微信】eksbobo 【如何入群】使用购买课程的 ID 作为请求信息，发送到作者的微信添加好友，作者会把您拉入到这门课程的微信群中。 打造一个简单实用的 SAP FIORI 入门开发课程，帮助广大 SAP 技术人员或者希望进入 SAP 技术领域的人打开一扇门。
- 神经网络对汽油辛烷值进行预测
网络上的神经网络对汽油辛烷值进行预测，个人进行了总结与修改并在Matlab上测试，通过训练spectra_data数据，然后测试，生成实际值与预测值对比，精确度较高，代码简单，适合初学者学习。
- c语言项目开发实例
十个c语言案例 （1）贪吃蛇 （2）五子棋游戏 （3）电话薄管理系统 （4）计算器 （5）万年历 （6）电子表 （7）客户端和服务器通信 （8）潜艇大战游戏 （9）鼠标器程序 （10）手机通讯录系统
- navicat简体中文版 绿色版 （64位）
解压后安装navicat，打开navicat执行PatchNavicat即破解成功。可以正常使用啦。
- t-sne降维可视化实例matlab
这是用t-sne算法对手写数字实例进行降维，可视化的实例，完美实现算法对手写数字的聚类，实现了分类效果。已经过检验可以使用，可放心下载运行。
- HarmonyOS.rar 华为鸿蒙操作系统 源码 国产操作系统源码 华为源码
`HarmonyOS` is the first full-scene distributed OS based on micro-kernel. It is an operating system independently developed by Huawei. On August 9, 2019, `HarmonyOS` System was officially released at the Huawei Developers Conference (
). Huawei will take the lead in deploying intelligent terminals such as smart screens, vehicle terminals and wearable terminals. In the future, more and more intelligent devices will use open source `HarmonyOS` .
- 数值分析原理_吴勃英
数值分析原理科学出版社吴勃英主编课本扫描件,lueluelue
- t-sne算法matlab原函数
matlab的t-sne算法，完美实现t-sne算法，已经过检验可以使用，可放心下载运行。