KOD cpp: UKRYJ
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include <fstream.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
String tab[36];
String wynik;
tab[0] = "Q";
tab[1] = "W";
tab[2] = "E";
tab[3] = "R";
tab[4] = "T";
tab[5] = "Y";
tab[6] = "U";
tab[7] = "I";
tab[8] = "O";
tab[9] = "P";
tab[10] = "1";
tab[11] = "2";
tab[12] = "3";
tab[13] = "4";
tab[14] = "5";
tab[15] = "6";
tab[16] = "7";
tab[17] = "8";
tab[18] = "9";
tab[19] = "0";
tab[20] = "A";
tab[21] = "S";
tab[22] = "D";
tab[23] = "F";
tab[24] = "G";
tab[25] = "H";
tab[26] = "J";
tab[27] = "K";
tab[28] = "L";
tab[29] = "Z";
tab[30] = "X";
tab[31] = "C";
tab[32] = "V";
tab[33] = "B";
tab[34] = "N";
tab[35] = "M";
int ile = 0;
int k;
String krok;
for(k = 1; k <= 1000; k++)
{
for(int i=0;i<=19;i++)
{
Randomize();
int x = random(35);
wynik = wynik + tab[x];
ile++;
if(i == 19)
{
ile = 0;
krok = IntToStr(k);
wynik = wynik + " " + krok + " \n";
}
if(ile == 4)
{
wynik = wynik + "-";
ile = 0;
}
}
ofstream outfile;
outfile.open("keys.txt");
outfile << wynik.t_str();
outfile.close();
}
}
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
#include <fstream.h>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
String tab[36];
String wynik;
tab[0] = "Q";
tab[1] = "W";
tab[2] = "E";
tab[3] = "R";
tab[4] = "T";
tab[5] = "Y";
tab[6] = "U";
tab[7] = "I";
tab[8] = "O";
tab[9] = "P";
tab[10] = "1";
tab[11] = "2";
tab[12] = "3";
tab[13] = "4";
tab[14] = "5";
tab[15] = "6";
tab[16] = "7";
tab[17] = "8";
tab[18] = "9";
tab[19] = "0";
tab[20] = "A";
tab[21] = "S";
tab[22] = "D";
tab[23] = "F";
tab[24] = "G";
tab[25] = "H";
tab[26] = "J";
tab[27] = "K";
tab[28] = "L";
tab[29] = "Z";
tab[30] = "X";
tab[31] = "C";
tab[32] = "V";
tab[33] = "B";
tab[34] = "N";
tab[35] = "M";
int ile = 0;
int k;
String krok;
for(k = 1; k <= 1000; k++)
{
for(int i=0;i<=19;i++)
{
Randomize();
int x = random(35);
wynik = wynik + tab[x];
ile++;
if(i == 19)
{
ile = 0;
krok = IntToStr(k);
wynik = wynik + " " + krok + " \n";
}
if(ile == 4)
{
wynik = wynik + "-";
ile = 0;
}
}
ofstream outfile;
outfile.open("keys.txt");
outfile << wynik.t_str();
outfile.close();
}
}
//---------------------------------------------------------------------------
Ma być 1000 osobnych ciągów każdy ma zaczynać się od nowej linii (linijka):
KOD cpp: UKRYJ
wynik = wynik + " "+krok+" \n";
Gdybym tylko zmienił ją tak jak poniżej to nie jest ich już 1000 tylko jakaś dziwna nigdzie z niczego nie wynikająca ilość :
KOD cpp: UKRYJ
wynik = wynik + " " + krok + "\n";
Tak tak chodzi mi o spację przed "\" to mam ich znacznie mniej
A przy okazji występują co jakiś czas pewne anomalie np. przeniesienie do nowej lini nie zadziała w zamian mam jakieś losowe dwa znaki i następny ciąg w tej samej linii .
Bardzo proszę o pomoc przy tym he banalnym programie bo nie wiem co się dzieje.
Chodzi mi też o to aby przy każdym otwarciu programu generowane ciągi były inne ponieważ za każdym razem 10 to ten sam 10 za następnym otwarciem.
Poniżej podaję program wersji skompilowanej.
Bardzo proszę o pomoc.
Pozdrawiam pitek3010





TStringList.