开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 电子书籍 > VC书籍 > 查看源码
Unit1.cpp
资源名称：C++Builder.rar　[点击查看]
上传用户：lhxd_sz
上传日期：2014-10-02
资源大小：38814k
文件大小：2k
源码类别：

VC书籍

开发平台：

C++ Builder

Unit1.cpp：源码内容
  1. //---------------------------------------------------------------------------
  2. #include <vcl.h>
  3. #include <stdio.h>
  4. #include <alloc.h>
  5. #pragma hdrstop
  7. #include "Unit1.h"
  8. //---------------------------------------------------------------------------
  9. #pragma package(smart_init)
  10. #pragma resource "*.dfm"
  11. TForm1 *Form1;
  12. //---------------------------------------------------------------------------
  13. __fastcall TForm1::TForm1(TComponent* Owner)
  14.         : TForm(Owner)
  15. {
  16. }
  17. //---------------------------------------------------------------------------
  19. void __fastcall TForm1::Button1Click(TObject *Sender)
  20. {
  21.   char *str;
  22.   int sz;
  23.   sz=1000000;
  25.   if ((str = (char *) malloc(sz)) == NULL)
  26.   {
  27.     ShowMessage("没有足够的内存！");
  28.   }
  29.   else
  30.   {
  31.     str[0]='1';
  32.     str[1]='2';
  33.     str[2]='3';
  34.     str[3]='4';
  35.     str[4]=0;
  36.     ShowMessage("已分配内存！");
  37.   }
  38.   free(str);
  39. }
  40. //---------------------------------------------------------------------------
  42. void __fastcall TForm1::Button2Click(TObject *Sender)
  43. {
  44.   int *str;
  45.   int sz;
  46.   sz=10000;
  48.   if ((str = (int *) malloc(sz)) == NULL)
  49.   {
  50.     ShowMessage("没有足够的内存！");
  51.   }
  52.   else
  53.   {
  54.     str[0]=12345678;
  55.     str[1]=789345612;
  56.     Edit1->Text=IntToStr(str[0]);
  57.     ShowMessage("已分配内存！");
  58.   }
  59.   free(str);
  60. }
  61. //---------------------------------------------------------------------------
  62. void __fastcall TForm1::Button3Click(TObject *Sender)
  63. {
  64.    char *str;
  65.    str = (char *) malloc(100000);
  66.    strcpy(str, "Hello");
  67.    sprintf(str,"地址为：%p",str);
  68.    ShowMessage(str);
  69.    str = (char *) realloc(str, 200000);
  70.    sprintf(str,"地址为：%p",str);
  71.    ShowMessage(str);
  72.    free(str);
  73. }
  74. //---------------------------------------------------------------------------
  76. void __fastcall TForm1::Button4Click(TObject *Sender)
  77. {
  78.   int *dd;
  79.   dd=new int[1000];
  80.   if(dd==NULL)
  81.   {
  82.     ShowMessage("无足够内存！");
  83.     return;
  84.   }
  85.   dd[0]=123456789;
  86.   dd[1]=678954321;
  87.   delete dd;
  88. }
  89. //---------------------------------------------------------------------------
  90. void __fastcall TForm1::Button5Click(TObject *Sender)
  91. {
  92.   char *dd;
  93.   dd=new char[1000];
  94.   if(dd==NULL)
  95.   {
  96.     ShowMessage("无足够内存！");
  97.     return;
  98.   }
  99.   dd[0]='1';
  100.   dd[1]='6';
  101.   dd[2]=0;
  102.   delete dd;
  103. }
  104. //---------------------------------------------------------------------------