Delphi7如何读取Bin文件?

用Delphi7做一个基于Can总线的通信软件,如何读取Bin文件发送大量数据呢?

3个回答

用MemoryStream读取,然后按照约定的数据格式,读取指定的长度,如果数据很大,就分批发送

给个网上例子
function ReadFile(FileName:String):boolean;
var F:File;
Src:Array[0..31] of Char;
i,resu:Integer;
begin
result:=True;
if not FileExists(FileName) then
begin
result:=false;
exit;
end;
AssignFile(F,FileName);
Reset(F,1);
while not Eof(F) do
begin
BlockRead(F,Src,sizeof(Src),resu);
for i:=0 to 20 do
Form1.Memo1.Lines.add(Src[Resu]);
end;
CloseFile(F);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
if not(OpenDialog1.Execute) then exit;
ReadFile(OpenDialog1.FileName);
end;

另一个实例,自己分析一下吧。

Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ComCtrls,StrUtils;

type
TForm1 = class(TForm)
Edit1: TEdit;
Button1: TButton;
Label1: TLabel;
ProgressBar1: TProgressBar;
Memo1: TMemo;
OpenDialog1: TOpenDialog;
Memo2: TMemo;
Button2: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
j:integer;
Form1: TForm1;
function ReadFile0(FileName:String):boolean;
function ReadFile1(FileName:String):boolean;
function ReadFile2(FileName:String):boolean;
function StrToHex(Const str: Ansistring): Ansistring;
function HexToStr(const Str: AnsiString): AnsiString;

implementation

{$R *.dfm}

//读取文件函数

function ReadFile0(FileName:String):boolean;
var
F:File;
Src:Array[0..1024-1] of Char;
i,j,numread:Integer;
begin
result:=True;
if not FileExists(FileName) then
begin
result:=false;
exit;
end;
AssignFile(F,FileName);
Reset(F,1);
if filesize(F) < sizeof(Src) then
begin //Test
CloseFile(f);
showmessage('文件大小错误');
exit;
end
else begin
numread:= sizeof(Src)-1;
repeat
BlockRead(F,Src,sizeof(Src),numread);
form1.Memo1.lines.add(Src[numread]);
Application.ProcessMessages;
until (NumRead = 0) ;
CloseFile(F);
Application.ProcessMessages;
end;
end;

//读取文件函数
function ReadFile1(FileName:String):boolean;
var
sFileName: string;
f: TfileStream;
ED_Data: array[0..2048] of char;
lRet: integer;
lOffset: Longint;
lOrigin: Word;
i,count:integer;
begin
sFileName:=form1.opendialog1.FileName;
f := TfileStream.Create(sFileName,fmOpenRead);
try
f.Seek(lOffset,lOrigin); //文件定位,从lOrigin开始移动lOffset
lRet := f.Read(f,count); //lRet为实际读到的字节数,ED_Data为读到的内容
form1.Memo2.Lines.LoadFromStream(f);
j:=f.size div 1024; //计算文件一共有多少个包
Application.ProcessMessages;
for i:=0 to j do
begin
form1.Label1.Caption:='正在读取第 '+inttostr(i)+' 包 ';
form1.Memo1.Text:=form1.Memo1.Text+ midstr(strtohex(form1.Memo2.text),2048*i,2048)+' ';
form1.ProgressBar1.Max :=j;
form1.ProgressBar1.Min:=0;
form1.ProgressBar1.Position := i;
Application.ProcessMessages;
end;
showmessage('成功读取'+inttostr(i)+'个包');
Application.ProcessMessages;
finally
FreeAndNil(f);
Application.ProcessMessages;
end;
end;

//delphi帮助文件
function ReadFile2(FileName:String):boolean;
var
iFileHandle: Integer;
iFileLength: Integer;
iBytesRead: Integer;
Buffer: Pchar;
i: Integer ;
begin
try
iFileHandle := FileOpen(form1.OpenDialog1.FileName, fmOpenRead);
iFileLength := FileSeek(iFileHandle,0,32);
FileSeek(iFileHandle,0,0);
Buffer :=pchar( AllocMem(iFileLength + 1));
iBytesRead := FileRead(iFileHandle, Buffer^, iFileLength);
FileClose(iFileHandle);
form1.Memo1.Lines.Add(buffer[i]);
finally
FreeMem(Buffer);
end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
memo1.Clear;
memo2.Clear;
if (OpenDialog1.Execute) and (Opendialog1.FileName<>'' )then
ReadFile0(Opendialog1.FileName);
end;

//20100403新增函数:
function StrToHex(Const str: Ansistring): Ansistring;
asm
push ebx
push esi
push edi
test eax,eax
jz @@Exit
mov esi,edx //保存edx值,用来产生新字符串的地址
mov edi,eax //保存原字符串
mov edx,[eax-4] //获得字符串长度
test edx,edx //检查长度
je @@Exit {Length(S) = 0}
mov ecx,edx //保存长度
Push ecx
shl edx,1
mov eax,esi
{$IFDEF VER210}
movzx ecx, word ptr [edi-12] {需要设置CodePage}
{$ENDIF}
call System.@LStrSetLength //设置新串长度
mov eax,esi //新字符串地址
Call UniqueString //产生一个唯一的新字符串,串位置在eax中
Pop ecx
@@SetHex:
xor edx,edx //清空edx
mov dl, [edi] //Str字符串字符
mov ebx,edx //保存当前的字符
shr edx,4 //右移4字节,得到高8位
mov dl,byte ptr[edx+@@HexChar] //转换成字符
mov [eax],dl //将字符串输入到新建串中存放
and ebx,$0F //获得低8位
mov dl,byte ptr[ebx+@@HexChar] //转换成字符
inc eax //移动一个字节,存放低位
mov [eax],dl
inc edi
inc eax
loop @@SetHex
@@Exit:
pop edi
pop esi
pop ebx
ret
@@HexChar: db '0123456789ABCDEF'
end;

function HexToStr(const Str: AnsiString): AnsiString;
asm
push ebx
push edi
push esi
test eax,eax //为空串
jz @@Exit
mov edi,eax
mov esi,edx
mov edx,[eax-4]
test edx,edx
je @@Exit
mov ecx,edx
push ecx
shr edx,1
mov eax,esi //开始构造字符串
{$IFDEF VER210}
movzx ecx, word ptr [edi-12] {需要设置CodePage}
{$ENDIF}
call System.@LStrSetLength //设置新串长度
mov eax,esi //新字符串地址
Call UniqueString //产生一个唯一的新字符串,串位置在eax中
Pop ecx
xor ebx,ebx
xor esi,esi
@@CharFromHex:
xor edx,edx
mov dl, [edi] //Str字符串字符
cmp dl, '0' //查看是否在0到f之间的字符
JB @@Exit //小于0,退出
cmp dl,'9' //小于=9
ja @@DoChar//CompOkNum
sub dl,'0'
jmp @@DoConvert
@@DoChar:
//先转成大写字符
and dl,$DF
cmp dl,'F'
ja @@Exit //大于F退出
add dl,10
sub dl,'A'
@@DoConvert: //转化
inc ebx
cmp ebx,2
je @@Num1
xor esi,esi
shl edx,4
mov esi,edx
jmp @@Num2
@@Num1:
add esi,edx
mov edx,esi
mov [eax],dl
xor ebx,ebx
inc eax
@@Num2:
dec ecx
inc edi
test ecx,ecx
jnz @@CharFromHex
@@Exit:
pop esi
pop edi
pop ebx
end;

//ByteToHex:

function ByteToHex(Src: Byte): String;
begin
SetLength(Result, 2);
asm
MOV EDI, [Result]
MOV EDI, [EDI]
MOV AL, Src
MOV AH, AL // Save to AH
SHR AL, 4 // Output High 4 Bits
ADD AL, '0'
CMP AL, '9'
JBE @@OutCharLo
ADD AL, 'A'-'9'-1
@@OutCharLo:
AND AH, $f
ADD AH, '0'
CMP AH, '9'
JBE @@OutChar
ADD AH, 'A'-'9'-1
@@OutChar:
STOSW
end;
end;

end.

Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
其他相关推荐
Delphi中读取DICOM文件的代码
这一句das. attributes. listattrinute(‘’,meno1.lines)中,为什么第一个参数空缺,第一个参数表示什么意思啊?第二个参数meno1.lines是代表的什么?如果要读取一个文件夹下的dcm文件,要怎么改这行代码呢?
Delphi7 中如何实现 TStringBuilder
Delphi7 中如何实现 TStringBuilder Delphi7 中如何实现 TStringBuilder
delphi 使用Query读取数据库的时候怎么做才能不显示SQL漏斗光标?
如题 我想要正常的指针样式,不要加载中的漏斗。 delphi 使用Query读取数据库的时候怎么做才能不显示SQL漏斗光标?
Delphi中窗宽窗位的调节
Delphi中已经读取DICOM文件并且显示,如何用参数修改其窗宽窗位的值?
delphi7 如何把一个表数据读出来再写到另一个表中
现有一个SQL数据库文件 请问怎么用DELPHI7把里面数据读取出来再写入另外一个表中。 数据库结构为: 学校名 学号 姓名 考号 ...... 一中 1 啊啊 1 二中 2 问问 2 ........ 以此类推 请问该怎么把数据读取再导入另一个表里面。
delphi K3读取基础资料图片
一下代码是VB写的,如何转换成delphi 1)从数据库取得图片的二进制数据 Dim bytFile() As Byte 'SQL读取:select FFile,FFileName from t_Accessory where FItemID=? bytFile= rs.Fields("FFile") 2)保存到文件 Dim m_sTempFileName As String Dim sFileName As String m_sTempFileName = App.Path + "\" + rs.Fields("FFileName") + ".tmp" sFileName = App.Path + "\" + rs.Fields("FFileName") Dim smFile As adodb.Stream Set smFile = New adodb.Stream smFile.Type = adTypeBinary smFile.Open smFile.Write bytFile smFile.SaveToFile m_sTempFileName, adSaveCreateOverWrite 3)解压缩 Dim ozip As Object Set ozip = CreateObject("KDZIP.ZIP") ozip.DeCompress m_sTempFileName, sFileName Kill m_sTempFileName Set ozip = Nothing 4)显示出来
delphi 7和delphi xe,你选哪一个?
过去开发项目一直用delphi 7,为了避免版权问题,现在想买套正版软件,纠结于买delphi 7还是delphi xe,大家来说说它们的优缺点吧
delphi 如何提取视频文件的时长?
RT,delphi 中如何提取视频文件的时长?麻烦各个大哥指点指点!
delphi7如何设置最小化托盘?
各位大神,问一下delphi7里怎样设置托盘?一定要外置控件吗。
delphi7 读取edit中输入的数字出错
在edit1里输入一个值参与运算,在button事件里读取没问题,但是在其他函数或者procedure里读取出错;并且在button里读取edit里的数据时不用定义edit,因为添加了edit时系统自动在type里定义了edit1,但是在其他function读取edit的数据时会报错:没有定义edit,就算手动加一个定义,读取还是会出错
delphi 用控件打开pdf文件无法读取pdf里的表单信息
我用的delphi7 用的是破解版的foxit_ax_pro.ocx文件版本3.0.1.2506,用OpenFile打开一个包含表单的pdf文件,浏览正常,但用代码访问时出错(下面第二行,FNameMI存在): frm:=FoxitReaderSDK1.GetCurrentForm(); ShowMessage(frm.GetFieldByName('FNameMI').Value) ; 变成无法获取表单信息。另外单独打开该pdf文件可以提交表单数据到url但是用这个控件,同样的按钮,提交可以,但获取不到表单数据。 有哪位高手能解答下,不胜感谢!!
DELPHI7如何创建一个带窗体的OCX
DELPHI7如何创建一个带窗体的OCX,不带窗体的简单例子已调试成功;新手上路,如解答请务必详细,先行谢过.
delphi7 如何添加windows函数GlobalMemoryStatusEx
delphi7 的windows.pas里没有这个函数,添加也不能引用
如何使用 Delphi RestClient 读取流数据?
OANDA网站提供的REST API可以读取账户信息("https://api-fxtrade.oanda.com/v1/accounts),以及提供流报价(streaming,比如"https://stream-fxtrade.oanda.com/v1/prices?accountId=12345&instruments=AUD_CAD%2CAUD_CHF" )。 目前在XE7版本,使用Delphi提供的RestClient组件可以实现读取账户信息。但是,对于服务端的流数据,由于其传输方式是 chunked transfer encoding,按照账户数据读取方式则会在停在最后Excute无法获得返回的Json字符串。 代码如下: ``` function GetStreamingPrices:TQJson var .... begin Result := TQJson.Create; // Get _RESTRequest.Method := rmGET; //指定资源位置:'/prices' _RESTRequest.Resource := TRequestSourceURITemplate.Prices; //生成query串:accountId=12345&instruments=AUD_CAD%2CAUD_CHF _RESTRequest.AddParameter(TQueryPairKey.AccountID,accountlist[0],pkGETorPOST); _RESTRequest.AddParameter(TQueryPairKey.Instruments,'EUR_USD',pkGETorPOST); //URL ._RestClient.BaseURL := 'https://stream-fxtrade.oanda.com/v1'; //执行 _RestRequest.Execute; //解析为Json Result.tryParse(_RESTResponse); end; ``` so,请教,如何使用Delphi XE7 的RestClient 获取 chunked transfer encoding 的流数据?请不吝赐教。 ----------------- 多谢一楼 @caozhy 提供的信息,不过没有没有解决此问题。我再描述一下: 1、上面的代码用于正常的request-response过程,是没有问题的。 2、 问题出在,报价流的获取上。报价服务器在工作时段实际是持续传输,一直没有结束,采取chunked transfer encoding模式持续地向外传输当时的即时价格信息。使用上面代码,就会处在一直等待状态下。 因此,需要达到的目标就是:一,不能等到结束标志才去解析收到的字符串。二,即便间歇获取数据,如果中间的缓冲时间过长,也不能忍受。
delphi7 能否使用GlobalMemoryStatus获得win7 32位内存信息?
delphi7 能否使用GlobalMemoryStatus获得win7 32位内存信息? 我的win7下是 总页面文件 dwTotalPageFile 和 未使用页面文件 dwAvailPageFile 得到的值相同,不管怎么测
delphi7 TcxLookupcombobox怎样自动选择第一条记录或者只有一条记录时自动选择
delphi7 TcxLookupcombobox怎样自动选择第一条记录或者只有一条记录时自动选择 不需要下拉点选
delphi7与xe7 URl中文编码问题
各位好! 我在调用HTTPEncode('年') 后,delphi7 的结果是 %C4%EA ;xe7的结果是%E5%B9%B4 怎么让xe7的结果是 %C4%EA 呢?
delphi 7 如何访问MariaDB 10.0.14
系统环境为win7 64bit,数据库为64bit 的mariadb10.0.14,安装了mariadb的64bit的odbc后,数据源可以访问到mariadb的数据库,但是delphi7的ado总是报错:在指定的dsn中,驱动程序和应用程序之间的体系结构不匹配。 大牛们,请问还需要怎么设置?或者有其他方式访问mariadb?
delphi7 关于使用 Generics.Collections 问题
我在使用 SQLiteTable3.pas文件的时候报错 [Fatal Error] SQLiteTable3.pas(80): File not found: 'Generics.Collections.dcu'。 查询了下Generics.Collections 是在delphi2009版本下新增的的泛型容器,而delphi7内没有,公司又不可能升级delphi7。那么有没什么办法让delphi 7可以use Generics.Collections 呢
Kafka实战(三) - Kafka的自我修养与定位
Apache Kafka是消息引擎系统,也是一个分布式流处理平台(Distributed Streaming Platform) Kafka是LinkedIn公司内部孵化的项目。LinkedIn最开始有强烈的数据强实时处理方面的需求,其内部的诸多子系统要执行多种类型的数据处理与分析,主要包括业务系统和应用程序性能监控,以及用户行为数据处理等。 遇到的主要问题: 数据正确性不足 数据的收集主要...
volatile 与 synchronize 详解
Java支持多个线程同时访问一个对象或者对象的成员变量,由于每个线程可以拥有这个变量的拷贝(虽然对象以及成员变量分配的内存是在共享内存中的,但是每个执行的线程还是可以拥有一份拷贝,这样做的目的是加速程序的执行,这是现代多核处理器的一个显著特性),所以程序在执行过程中,一个线程看到的变量并不一定是最新的。 volatile 关键字volatile可以用来修饰字段(成员变量),就是告知程序任何对该变量...
Java学习的正确打开方式
在博主认为,对于入门级学习java的最佳学习方法莫过于视频+博客+书籍+总结,前三者博主将淋漓尽致地挥毫于这篇博客文章中,至于总结在于个人,实际上越到后面你会发现学习的最好方式就是阅读参考官方文档其次就是国内的书籍,博客次之,这又是一个层次了,这里暂时不提后面再谈。博主将为各位入门java保驾护航,各位只管冲鸭!!!上天是公平的,只要不辜负时间,时间自然不会辜负你。 何谓学习?博主所理解的学习,它是一个过程,是一个不断累积、不断沉淀、不断总结、善于传达自己的个人见解以及乐于分享的过程。
程序员必须掌握的核心算法有哪些?
由于我之前一直强调数据结构以及算法学习的重要性,所以就有一些读者经常问我,数据结构与算法应该要学习到哪个程度呢?,说实话,这个问题我不知道要怎么回答你,主要取决于你想学习到哪些程度,不过针对这个问题,我稍微总结一下我学过的算法知识点,以及我觉得值得学习的算法。这些算法与数据结构的学习大多数是零散的,并没有一本把他们全部覆盖的书籍。下面是我觉得值得学习的一些算法以及数据结构,当然,我也会整理一些看过...
有哪些让程序员受益终生的建议
从业五年多,辗转两个大厂,出过书,创过业,从技术小白成长为基层管理,联合几个业内大牛回答下这个问题,希望能帮到大家,记得帮我点赞哦。 敲黑板!!!读了这篇文章,你将知道如何才能进大厂,如何实现财务自由,如何在工作中游刃有余,这篇文章很长,但绝对是精品,记得帮我点赞哦!!!! 一腔肺腑之言,能看进去多少,就看你自己了!!! 目录: 在校生篇: 为什么要尽量进大厂? 如何选择语言及方...
大学四年自学走来,这些私藏的实用工具/学习网站我贡献出来了
大学四年,看课本是不可能一直看课本的了,对于学习,特别是自学,善于搜索网上的一些资源来辅助,还是非常有必要的,下面我就把这几年私藏的各种资源,网站贡献出来给你们。主要有:电子书搜索、实用工具、在线视频学习网站、非视频学习网站、软件下载、面试/求职必备网站。 注意:文中提到的所有资源,文末我都给你整理好了,你们只管拿去,如果觉得不错,转发、分享就是最大的支持了。 一、电子书搜索 对于大部分程序员...
linux系列之常用运维命令整理笔录
本博客记录工作中需要的linux运维命令,大学时候开始接触linux,会一些基本操作,可是都没有整理起来,加上是做开发,不做运维,有些命令忘记了,所以现在整理成博客,当然vi,文件操作等就不介绍了,慢慢积累一些其它拓展的命令,博客不定时更新 free -m 其中:m表示兆,也可以用g,注意都要小写 Men:表示物理内存统计 total:表示物理内存总数(total=used+free) use...
比特币原理详解
一、什么是比特币 比特币是一种电子货币,是一种基于密码学的货币,在2008年11月1日由中本聪发表比特币白皮书,文中提出了一种去中心化的电子记账系统,我们平时的电子现金是银行来记账,因为银行的背后是国家信用。去中心化电子记账系统是参与者共同记账。比特币可以防止主权危机、信用风险。其好处不多做赘述,这一层面介绍的文章很多,本文主要从更深层的技术原理角度进行介绍。 二、问题引入 假设现有4个人...
GitHub开源史上最大规模中文知识图谱
近日,一直致力于知识图谱研究的 OwnThink 平台在 Github 上开源了史上最大规模 1.4 亿中文知识图谱,其中数据是以(实体、属性、值),(实体、关系、实体)混合的形式组织,数据格式采用 csv 格式。 到目前为止,OwnThink 项目开放了对话机器人、知识图谱、语义理解、自然语言处理工具。知识图谱融合了两千五百多万的实体,拥有亿级别的实体属性关系,机器人采用了基于知识图谱的语义感...
程序员接私活怎样防止做完了不给钱?
首先跟大家说明一点,我们做 IT 类的外包开发,是非标品开发,所以很有可能在开发过程中会有这样那样的需求修改,而这种需求修改很容易造成扯皮,进而影响到费用支付,甚至出现做完了项目收不到钱的情况。 那么,怎么保证自己的薪酬安全呢? 我们在开工前,一定要做好一些证据方面的准备(也就是“讨薪”的理论依据),这其中最重要的就是需求文档和验收标准。一定要让需求方提供这两个文档资料作为开发的基础。之后开发...
网页实现一个简单的音乐播放器(大佬别看。(⊙﹏⊙))
今天闲着无事,就想写点东西。然后听了下歌,就打算写个播放器。 于是乎用h5 audio的加上js简单的播放器完工了。 演示地点演示 html代码如下` music 这个年纪 七月的风 音乐 ` 然后就是css`*{ margin: 0; padding: 0; text-decoration: none; list-...
微信支付崩溃了,但是更让马化腾和张小龙崩溃的竟然是……
loonggg读完需要3分钟速读仅需1分钟事件还得还原到昨天晚上,10 月 29 日晚上 20:09-21:14 之间,微信支付发生故障,全国微信支付交易无法正常进行。然...
Python十大装B语法
Python 是一种代表简单思想的语言,其语法相对简单,很容易上手。不过,如果就此小视 Python 语法的精妙和深邃,那就大错特错了。本文精心筛选了最能展现 Python 语法之精妙的十个知识点,并附上详细的实例代码。如能在实战中融会贯通、灵活使用,必将使代码更为精炼、高效,同时也会极大提升代码B格,使之看上去更老练,读起来更优雅。
数据库优化 - SQL优化
以实际SQL入手,带你一步一步走上SQL优化之路!
2019年11月中国大陆编程语言排行榜
2019年11月2日,我统计了某招聘网站,获得有效程序员招聘数据9万条。针对招聘信息,提取编程语言关键字,并统计如下: 编程语言比例 rank pl_ percentage 1 java 33.62% 2 cpp 16.42% 3 c_sharp 12.82% 4 javascript 12.31% 5 python 7.93% 6 go 7.25% 7 p...
通俗易懂地给女朋友讲:线程池的内部原理
餐盘在灯光的照耀下格外晶莹洁白,女朋友拿起红酒杯轻轻地抿了一小口,对我说:“经常听你说线程池,到底线程池到底是个什么原理?”
《奇巧淫技》系列-python!!每天早上八点自动发送天气预报邮件到QQ邮箱
将代码部署服务器,每日早上定时获取到天气数据,并发送到邮箱。 也可以说是一个小型人工智障。 知识可以运用在不同地方,不一定非是天气预报。
经典算法(5)杨辉三角
杨辉三角 是经典算法,这篇博客对它的算法思想进行了讲解,并有完整的代码实现。
英特尔不为人知的 B 面
从 PC 时代至今,众人只知在 CPU、GPU、XPU、制程、工艺等战场中,英特尔在与同行硬件芯片制造商们的竞争中杀出重围,且在不断的成长进化中,成为全球知名的半导体公司。殊不知,在「刚硬」的背后,英特尔「柔性」的软件早已经做到了全方位的支持与支撑,并持续发挥独特的生态价值,推动产业合作共赢。 而对于这一不知人知的 B 面,很多人将其称之为英特尔隐形的翅膀,虽低调,但是影响力却不容小觑。 那么,在...
腾讯算法面试题:64匹马8个跑道需要多少轮才能选出最快的四匹?
昨天,有网友私信我,说去阿里面试,彻底的被打击到了。问了为什么网上大量使用ThreadLocal的源码都会加上private static?他被难住了,因为他从来都没有考虑过这个问题。无独有偶,今天笔者又发现有网友吐槽了一道腾讯的面试题,我们一起来看看。 腾讯算法面试题:64匹马8个跑道需要多少轮才能选出最快的四匹? 在互联网职场论坛,一名程序员发帖求助到。二面腾讯,其中一个算法题:64匹...
面试官:你连RESTful都不知道我怎么敢要你?
干货,2019 RESTful最贱实践
刷了几千道算法题,这些我私藏的刷题网站都在这里了!
遥想当年,机缘巧合入了 ACM 的坑,周边巨擘林立,从此过上了"天天被虐似死狗"的生活… 然而我是谁,我可是死狗中的战斗鸡,智力不够那刷题来凑,开始了夜以继日哼哧哼哧刷题的日子,从此"读题与提交齐飞, AC 与 WA 一色 ",我惊喜的发现被题虐既刺激又有快感,那一刻我泪流满面。这么好的事儿作为一个正直的人绝不能自己独享,经过激烈的颅内斗争,我决定把我私藏的十几个 T 的,阿不,十几个刷题网...
为啥国人偏爱Mybatis,而老外喜欢Hibernate/JPA呢?
关于SQL和ORM的争论,永远都不会终止,我也一直在思考这个问题。昨天又跟群里的小伙伴进行了一番讨论,感触还是有一些,于是就有了今天这篇文。 声明:本文不会下关于Mybatis和JPA两个持久层框架哪个更好这样的结论。只是摆事实,讲道理,所以,请各位看官勿喷。 一、事件起因 关于Mybatis和JPA孰优孰劣的问题,争论已经很多年了。一直也没有结论,毕竟每个人的喜好和习惯是大不相同的。我也看...
白话阿里巴巴Java开发手册高级篇
不久前,阿里巴巴发布了《阿里巴巴Java开发手册》,总结了阿里巴巴内部实际项目开发过程中开发人员应该遵守的研发流程规范,这些流程规范在一定程度上能够保证最终的项目交付质量,通过在时间中总结模式,并推广给广大开发人员,来避免研发人员在实践中容易犯的错误,确保最终在大规模协作的项目中达成既定目标。 无独有偶,笔者去年在公司里负责升级和制定研发流程、设计模板、设计标准、代码标准等规范,并在实际工作中进行...
SQL-小白最佳入门sql查询一
不要偷偷的查询我的个人资料,即使你再喜欢我,也不要这样,真的不好;
项目中的if else太多了,该怎么重构?
介绍 最近跟着公司的大佬开发了一款IM系统,类似QQ和微信哈,就是聊天软件。我们有一部分业务逻辑是这样的 if (msgType = "文本") { // dosomething } else if(msgType = "图片") { // doshomething } else if(msgType = "视频") { // doshomething } else { // doshom...
Nginx 原理和架构
Nginx 是一个免费的,开源的,高性能的 HTTP 服务器和反向代理,以及 IMAP / POP3 代理服务器。Nginx 以其高性能,稳定性,丰富的功能,简单的配置和低资源消耗而闻名。 Nginx 的整体架构 Nginx 里有一个 master 进程和多个 worker 进程。master 进程并不处理网络请求,主要负责调度工作进程:加载配置、启动工作进程及非停升级。worker 进程负责处...
YouTube排名第一的励志英文演讲《Dream(梦想)》
Idon’t know what that dream is that you have, I don't care how disappointing it might have been as you've been working toward that dream,but that dream that you’re holding in your mind, that it’s po...
“狗屁不通文章生成器”登顶GitHub热榜,分分钟写出万字形式主义大作
一、垃圾文字生成器介绍 最近在浏览GitHub的时候,发现了这样一个骨骼清奇的雷人项目,而且热度还特别高。 项目中文名:狗屁不通文章生成器 项目英文名:BullshitGenerator 根据作者的介绍,他是偶尔需要一些中文文字用于GUI开发时测试文本渲染,因此开发了这个废话生成器。但由于生成的废话实在是太过富于哲理,所以最近已经被小伙伴们给玩坏了。 他的文风可能是这样的: 你发现,...
程序员:我终于知道post和get的区别
是一个老生常谈的话题,然而随着不断的学习,对于以前的认识有很多误区,所以还是需要不断地总结的,学而时习之,不亦说乎
相关热词 c# 图片上传 c# gdi 占用内存 c#中遍历字典 c#控制台模拟dos c# 斜率 最小二乘法 c#进程延迟 c# mysql完整项目 c# grid 总行数 c# web浏览器插件 c# xml 生成xsd
立即提问