jonatanfurtado

Pessoal, esse programa abaixo, funciona assim: Quando pressiono a tecla do pino A1(PIC) ele executa a função "rodamotor_left();", porém, quero pressionar a tecla uma vez e a função repita quantas vezes eu quizer, já tentei fazer laços de repetiçoes, mas não tive sucesso. Por Favor me ajudem!! obrigado!! Se precisarem do código completo eu coloco aqui!! if (!input(PIN_A1)) { { rodamotor_left(); ui8_controla_motor++; } if (ui8_controla_motor>=4) ui8_controla_motor=0; }

Pessoal preciso de ajuda com esse erro! ************************************************* [C++ Error] Unit1.cpp(52): E2034 Cannot convert 'TStrings * const' to 'long' ********************************************************************** long int Conta; __________________________________________________ long int Num_Linhas; Num_Linhas = Memo1->Lines; // O ERRO ESTÁ NESSAS 2 LINHAS :rolleyes: ______________________________________________________ for(Conta=0;Conta<Num_Linhas; Conta++) { // Memo1-> Series1->AddY(StrToInt(Memo1->Lines->GetText())); }

Pessoal preciso fazer um prog. no builder. preciso abrir um arquivo em .txt e colocar em um Memo. após o numeros estarem no Memo ler esses numeros e faça um gráfico com Tchart. abrir o arquivo e ir p/ o Memo está ok, mas o problema está em passar do Memo para o gráfico....abaixo está o que consegui. Se puderem me ajudar agradeço. #include <vcl.h> #pragma hdrstop #include <stdio.h> #include <conio.h> #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { FILE*arqtxt; char linha[256]; AnsiString linha_completa; OpenDialog1->Options.Clear(); OpenDialog1->Filter= "Text files (*.txt)|*.txt|ALL Files (*.*)|*.*"; OpenDialog1->FilterIndex=1; OpenDialog1->Execute(); arqtxt = fopen(OpenDialog1->FileName.c_str(),"r+"); while(!feof(arqtxt)) { fgets(linha, sizeof(linha),arqtxt); linha_completa=AnsiString(linha)+""+OpenDialog1->FileName; Memo1->Lines->Append(linha); } fclose(arqtxt); }