LA LOCURA DE LA MANO DE C++ BUILDER 6
Publicado por klgallego (17 intervenciones) el 17/06/2015 13:46:53
Buenas a todos, soy estudiante de robótica y bastante interesado en la programación en C. Desde el principio he programado con Dev-C++ por que es con el que me evalúan, pero me sentí atraído por otros programas como CodeBlocks y ahora Builder 6 con el que acabare dándome a la bebida. He programado un chat siguiendo tutoriales por internet y consultando foros, una vez lo he terminado y funciona he querido cambiar simplemente el color del cliente para diferenciar su nombre del servidor y que se vea mas visual. Pues intento utilizar los métodos que utilizaba en dev-c++ (system("COLOR B0", etc...) y no me lo acepta, tampoco se bien donde ponerlo .
Agradecería que si alguien sabe solucionar esta tonteria me diera un pequeño empujón para seguir con ello.
Os copio la parte de la programación del cliente:
GRACIAS
Agradecería que si alguien sabe solucionar esta tonteria me diera un pequeño empujón para seguir con ello.
Os copio la parte de la programación del cliente:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
//---------------------------------------------------------------------------
#include <vcl.h>
#include <stdio.h>
#include <stdlib.h>
#include <math.h>
#include <string.h>
#include <time.h>
#include <conio.h>
#pragma hdrstop
#include "cliente.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
ClientSocket1->Address = eIP->Text;
ClientSocket1->Active = true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ClientSocket1->Socket->SendText(eMensaje->Text);
mMensajes->Lines->Add(ClientSocket1->Socket->LocalHost + ": " + eMensaje->Text);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ClientSocket1Read(TObject *Sender,
TCustomWinSocket *Socket)
{
mMensajes->Lines->Add(Socket->RemoteHost + ": " + Socket->ReceiveText());
}
//---------------------------------------------------------------------------
GRACIAS
Valora esta pregunta
0