<?xml version="1.0" encoding="utf-8" ?><rss version="2.0"><channel><title><![CDATA[shao882的专栏]]></title><description><![CDATA[http://weibo.com/pc100cn]]></description><link>https://blog.youkuaiyun.com/shao882</link><language>zh-cn</language><generator>https://blog.youkuaiyun.com/</generator><copyright><![CDATA[Copyright &copy; shao882]]></copyright><item><title><![CDATA[如何将Bitmap位图与base64字符串相互转换[delphi]]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44283871</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44283871</guid><author>shao882</author><pubDate>Sun, 15 Mar 2015 23:20:32 +0800</pubDate><description><![CDATA[uses EncdDecd;



然后就可以使用下面二个函数了:


by
 菩提树下的杨过 http://yjmyzz.cnblogs.com/

///将Bitmap位图转化为base64字符串
function BitmapToString(img:TBitmap):string ;
var
  ms:TMemoryStream;
  ss:TStringStr]]></description><category></category></item><item><title><![CDATA[delphi编程里的bool跟boolean类型有什么区别]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44283789</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44283789</guid><author>shao882</author><pubDate>Sun, 15 Mar 2015 23:18:15 +0800</pubDate><description><![CDATA[bool是LongBool类型。



 

Delphi中定义了四种布尔类型：Boolean，ByteBool，WordBool和LongBool。后面三种布尔类型是为了与其他语言兼容而引入的，一般情况下建议使用Boolean类型。

这四种类型的布尔值占用内存的数量如下：

Boolean 1 Byte

ByteBool 1 Byte

WordBool 2 By]]></description><category></category></item><item><title><![CDATA[在Delphi里实现[int map string]对]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44206017</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44206017</guid><author>shao882</author><pubDate>Wed, 11 Mar 2015 21:58:45 +0800</pubDate><description><![CDATA[在Delphi里实现[int map string]对
Type
    TIntToStrArray = Array[0..65535] Of PChar;
//有序范例不克不及设为Integer，[Error] :Data type too large: exceeds 2 GB
//也不克不及设太年夜，会占很年夜内存
//在要领里声明最好小些，全局里可以年夜些
 

Var
    aInt]]></description><category></category></item><item><title><![CDATA[delphi获取目录下所有文件名[delphi]]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44205993</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44205993</guid><author>shao882</author><pubDate>Wed, 11 Mar 2015 21:57:36 +0800</pubDate><description><![CDATA[procedure  searchfile(path:string);//细致,path背面要有'\';   
   var   
       SearchRec:TSearchRec;   
       found:integer;   
   begin   
       found:=FindFirst(path+'*.*',faAnyFile,SearchRec);   ]]></description><category></category></item><item><title><![CDATA[php如何抓取网页]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44004017</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44004017</guid><author>shao882</author><pubDate>Sun, 01 Mar 2015 17:40:06 +0800</pubDate><description><![CDATA[来自： http://www.thinkphp.cn/topic/28229.html



$url = "http://www.pc100.net"; 
$contents = file_get_contents($url); 
//如果出现中文乱码使用下面代码 
//$getcontent = iconv("gb2312", "utf-8",$contents); 
echo]]></description><category></category></item><item><title><![CDATA[php获取空间头像图片的方法]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44003949</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44003949</guid><author>shao882</author><pubDate>Sun, 01 Mar 2015 17:30:39 +0800</pubDate><description><![CDATA[php获取空间头像图片的方法



来自：http://outofmemory.cn/code-snippet/36058/php-get-space-touxiangtupian-method




<?php //获取空间头像图片 $url = "http://qlogo2.store.qq.com/qzone/393183837/393183837/50"; $curl ]]></description><category></category></item><item><title><![CDATA[delphi7 开发ActiveX的学习备忘录]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44003793</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44003793</guid><author>shao882</author><pubDate>Sun, 01 Mar 2015 17:05:15 +0800</pubDate><description><![CDATA[关于delphi7 ActiveX的学习备忘





步骤:

1、先创建ActiveX工程文件；

 2、注册ActiveX文件(ocx文件) ；

3、编写相应调用ActiveX文件(.ocx文件)的html文件.

具体操作流程如下：

步骤1：

a、选择File->New->Other ，ActiveX页面，选择ActiveX Form ；

b]]></description><category></category></item><item><title><![CDATA[在Delphi中操作注册表的方法]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44003703</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44003703</guid><author>shao882</author><pubDate>Sun, 01 Mar 2015 16:55:15 +0800</pubDate><description><![CDATA[Delphi提供了TRegistry类，它直接继承自TObject类，主要属性有：RootKey等，主要方法有：Create，CreateKey(Key)，




 



OpenKey(Key,CanCreate)，WriteString(Name,Value)，ReadString(Name)，CloseKey，Free等，下面对它们进行简单介绍。



1、1、]]></description><category></category></item><item><title><![CDATA[delphi通过使用“内存映射文件”，实现内存共享]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44003685</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44003685</guid><author>shao882</author><pubDate>Sun, 01 Mar 2015 16:52:45 +0800</pubDate><description><![CDATA[一.原理

    通过使用“内存映射文件”，实现内存共享

二.主要操作

    共享内存结构：

  PShareMem = ^TShareMem;
  TShareMem = Record
    id:string[10];
    name:string[20];
    age:Integer;  end;

    基本变量：

    shareMemNa]]></description><category></category></item><item><title><![CDATA[PHP字符串函数汇总]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/44003665</link><guid>https://blog.youkuaiyun.com/shao882/article/details/44003665</guid><author>shao882</author><pubDate>Sun, 01 Mar 2015 16:50:10 +0800</pubDate><description><![CDATA[1. 查找字符位置函数

strpos($str,search,[int]):   查找search在$str中的第一次位置从int开始

stripos($str,search,[int]):  函数返回字符串在另一个字符串中第一次出现的位置
strrpos($str,search,[int]):  查找search在$str中的最后一次出现的位置从int

 

2. 提取子]]></description><category></category></item><item><title><![CDATA[delphi如何实现无窗口移动]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/43951051</link><guid>https://blog.youkuaiyun.com/shao882/article/details/43951051</guid><author>shao882</author><pubDate>Thu, 26 Feb 2015 10:44:03 +0800</pubDate><description><![CDATA[原文来自: 【100脚本网 http://www.pc100.net 】
 procedure imgListMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);



private

 procedure WMNCHITTEST(var Msg: TWMNCHITT]]></description><category></category></item><item><title><![CDATA[php如何抓取网页中邮箱地址代码]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/43950981</link><guid>https://blog.youkuaiyun.com/shao882/article/details/43950981</guid><author>shao882</author><pubDate>Thu, 26 Feb 2015 10:37:55 +0800</pubDate><description><![CDATA[php如何抓取网页中邮箱地址，下面我就给大家分享一个用php抓取网页中电子邮箱的实例。 

原文来自： http://outofmemory.cn/code-snippet/36020/php-how-zhuaqu-wangye-youxiangdizhi-code
    <?php 
    /** 
    desc：采集网页中的邮箱的代码 
    link：www.pc100.ne]]></description><category></category></item><item><title><![CDATA[Delphi MDI 子窗体的创建和销毁 [zhuan]]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/43028413</link><guid>https://blog.youkuaiyun.com/shao882/article/details/43028413</guid><author>shao882</author><pubDate>Thu, 22 Jan 2015 22:00:58 +0800</pubDate><description><![CDATA[文章来源： Delphi MDI 子窗体的创建和销毁

1.如果要创建一个mdi child，先看是否有这个child 存在，如果有，则用它，如果没有再创建

//该函数判断MDI 子窗体是否存在，再进行创建和显示
function isInclude(formclass: TFormClass): boolean;
var
  i: Integer;
  form: TObjec]]></description><category></category></item><item><title><![CDATA[delphi如何把Frame嵌入一个Form里面]]></title><link>https://blog.youkuaiyun.com/shao882/article/details/42932697</link><guid>https://blog.youkuaiyun.com/shao882/article/details/42932697</guid><author>shao882</author><pubDate>Tue, 20 Jan 2015 22:15:57 +0800</pubDate><description><![CDATA[本文出处：delphi 把Frame嵌入一个Form里面

引言：最近编写delphi时遇到一个frame复用的问题，如何在一个form窗体添加一个已经编辑好的frame？就像delphi的组件一样方便使用。下面是自己总结的方法，虽然很简单，但是对不了解的同学还是一个小麻烦。

 

步骤：

1. 编辑一个frame页面，如下图。



2.编辑frame，为简单起见就一]]></description><category></category></item></channel></rss>