首页
学习
活动
专区
圈层
工具
发布
    • 综合排序
    • 最热优先
    • 最新优先
    时间不限
  • 来自专栏微卡智享

    delphi调用webservice问题总结

    TFrmUpLoad.btn2Click(Sender: TObject); function ReadFile(fileName:string): TByteDynArray; var fs:TFileStream ; iSize:Int64; begin try fs:=TFileStream.Create(fileName,fmOpenRead); iSize:=fs.Seek

    2.9K20发布于 2019-07-24
  • 来自专栏小樱的经验随笔

    自己手动复现一个熊猫烧香病毒

    ,以备使用 { 将宿主文件从已感染的PE文件中分离出来,以备使用 } procedure ExtractFile(FileName: string); var sStream, dStream: TFileStream ; begin try sStream := TFileStream.Create(ParamStr(0), fmOpenRead or fmShareDenyNone); try dStream := TFileStream.Create(FileName, fmCreate); try sStream.Seek(HeaderSize, 0 begin end; 感染 PE 文件 { 感染PE文件 } procedure InfectOneFile(FileName: string); var HdrStream, SrcStream: TFileStream (FileName, fmOpenRead); //头文件 HdrStream := TFileStream.Create(ParamStr(0), fmOpenRead or

    8.1K21发布于 2018-09-21
  • 来自专栏微卡智享

    delphi提示“Undeclared identifier”的缺少引用单元列表

    TControl Controls or QControls TCriticalSection SyncObjs TField DB TFieldType DB TFileName SysUtils TFileStream

    2.9K20发布于 2019-07-25
  • 来自专栏全栈程序员必看

    delphi vcl_delphi数据类型

    TStream,TFileStream,TMemoryStream和TResourceStream类都可以读写数据流,TStream是所有数据流类的基类,当处理磁盘上的文件时就会用到TFileStream

    4.4K10编辑于 2022-11-09
  • 来自专栏游戏安全攻防

    一文 读懂 还原 破解 incaseformat病毒

    incaseformat.log LOBYTE(v5) = 1; // 用文件流方式进对每个磁盘创建并留下incaseformat.log标记 *(_DWORD *)v3 = Classes::TFileStream ::TFileStream((Classes::TFileStream *)&off_411E10, v5, v15[0]); ++v18; v3 += 4; --v2

    1.6K114发布于 2021-02-05
  • 来自专栏全栈程序员必看

    [重点]delphi 实现 根据给定的标题去《中国青年报》网上电子报数据中查找匹配的内容,并从该内容中取出引题、正题、副题、作者和正文。

    String; var List: TStrings); var FileRec: TSearchrec; Sour, OldFileName, NewFileName: String; fs: TFileStream

    1.1K40编辑于 2022-09-07
  • 来自专栏Gamma安全实验室

    一文 读懂 还原 破解 incaseformat病毒

    incaseformat.log LOBYTE(v5) = 1; // 用文件流方式进对每个磁盘创建并留下incaseformat.log标记 *(_DWORD *)v3 = Classes::TFileStream ::TFileStream((Classes::TFileStream *)&off_411E10, v5, v15[0]); ++v18; v3 += 4; --v2

    1.6K20发布于 2021-02-08
领券