void CMyFrameWin::OnRun()
{
	/*  
        char s[80];                         // проверка доходит ли Number до передачи в DLL
	CClientDC dc(this);                 // проверка доходит ли Number до передачи в DLL
	wsprintf(s,"Number is %d",Number);  // проверка доходит ли Number до передачи в DLL
	dc.TextOut(100,200,s);              // проверка доходит ли Number до передачи в DLL
    */
    int res;
	HINSTANCE hDll;
	char s[100];
	hDll=::LoadLibrary("MyDll");
	typedef int (*FUN)(int);
	FUN func;
	func=(FUN)::GetProcAddress(hDll, "calc");
	res=(*func)(Number);
	sprintf(s,"%f", res);
	MessageBox(s,"Result");
	 //создание и запись результата в файл
     FILE *result;
	 result=fopen("result.txt","w");
	 fprintf(result,"%f",res);
	 fclose(result); 
  
 
  }

#include "stdafx.h"
#include <conio.h>

int calc(int Number)
{
	int r=Number;
	int res;
        res=r+3;
	return res;
}

LIBRARY      "MyDll"
DESCRIPTION 'This library has one function'
EXPORTS
  calc @1

FILE *MyFile, *OUT;
char temp;
Symbols[3] = {'a', 'b', 'c'};
......

MyFile = fopen("1.txt", "r");
OUT = fopen("2.txt", "wb");
while(!feof(MyFile))
{
  fread(&temp, 1, sizeof(char), MyFile);
  for(i=0; i<3; i++)
    if(temp == Symbols[i])
	fwrite((const char*)&a[i], 1, sizeof(a[i]), OUT);
}

#include <stdio.h>

void main()
{
	FILE *in, *out;

	//кодирование 3мя битами
	int ar[3] = {0x00, 0x05, 0x07}; //коды 'a', 'b', 'c'
	char buf; //тут сидит считанный байт с файла

	in = fopen("f1.txt", "rb");
	out = fopen("f2.bin", "wb");

	int count = 0;

	union {
		int out_buf;
		char b[4];
	} data;

	data.out_buf = 0;

	while(fread(&buf, 1, 1, in))
	{
		if(count < 8)
		{ //не записываем, пока не наберем кратное 8ми
			//количество битов
			data.out_buf = (data.out_buf<<3) + ar[buf - 'a'];
			count++;
		}
		else
		{ //запись битов			
			fwrite(&data.b[2], 1, 1, out);
			fwrite(&data.b[1], 1, 1, out);
			fwrite(&data.b[0], 1, 1, out);
			data.out_buf = ar[buf - 'a'];
			count = 1;
		}
	}

	if(count > 0)
	{ //запись остатков
		fwrite(&data.b[2], 1, 1, out);
		fwrite(&data.b[1], 1, 1, out);
		fwrite(&data.b[0], 1, 1, out);
	}

	fclose(out);
	fclose(in);
}

bacbabcabcbacbabcbacba

FILE *MyFile, *OUT;
char temp;
Symbols[3] = {'a', 'b', 'c'};
......

MyFile = fopen("1.txt", "r");
OUT = fopen("2.txt", "wb");
while((temp=fgetc(MyFile))!=EOF)
{
  for(i=0; i<3; i++)
    if(temp == Symbols[i])
	fwrite((const char*)&a[i], 1, sizeof(a[i]), OUT);
}