Udskriv af TXT filer til 3 Forskellige printer !
Hej !Jeg har en lille stump kode jeg skal have til at printe et antal valgte TXT filer ud.
De txt filer der skal printes vælges i checkbox'sene og når der så trykkes på "ButtomUdskriv" knappen skal lave de valgte så udskrives på deres hver der printer
Info:
Koden er skrevet i borland c++ builder 6
Alle 3 printer er netværks printer
Alle 3 checkbox'se er som defaut TRUE
Hvert stykke checkbox kode har hver deres printer.
Håber der er nogle der kan give et bud på et stykke kode til ButtomUdskriv der kan få den til at skrive ud til printerne
Hvis i mangler info så skriv det lige så skal jeg give jer det, hvis jeg kan.
KODE START
************************************************
void __fastcall TForm1::CheckBox1Click(TObject *Sender){
// Hvis denne er checked vil der blive udskrevet en adresse seddel når der bliver tryyket på udskriv.
if ( CheckBox1->Checked == TRUE)
char text2[64]; // Client Ref.
char text3[56]; // FirmaNavn
char text4[64]; // Add.
char text5[64]; // Nr.
char text6[64]; // By
char text7[64]; // Post nr.
char text8[64]; // Produkt navn.
char text17[64]; // Att. person
Edit1->GetTextBuf(text3,56);
Edit2->GetTextBuf(text17,56);
Edit3->GetTextBuf(text4,56);
Edit4->GetTextBuf(text5,56);
Edit5->GetTextBuf(text6,64);
Edit6->GetTextBuf(text7,64);
//Edit9->GetTextBuf(text2,64); // undefined symbol 'text2' ?? skal undersøges
Edit10->GetTextBuf(text8,64);
ofs.open("AdresseLabel.txt",ios::out);
ofs << " " << endl;
ofs << " " << text3 << endl;
ofs << " " << text17 << endl;
ofs << " " << text4;
ofs << " " << text5 << endl;
ofs << " " << text7;
ofs << " " << text6 << endl;
ofs << " " << endl;
ofs << " " << text3 << endl; //skal laves om til text2
ofs << " " << text3 << endl; //skal laves om til text2
ofs << " " << endl;
ofs << " " << text8 << endl;
ofs.close();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CheckBox2Click(TObject *Sender){
// if ( CheckBox2->Checked == TRUE)
// Hvis denne er checked vil der blive udskrevet en Rød dato seddel når der bliver tryyket på udskriv.
// KODE TILGÅR.
}
//---------------------------------------------------------------------------
void __fastcall TForm1::CheckBox3Click(TObject *Sender){
if ( CheckBox3->Checked == TRUE)
// Hvis denne er checked vil der blive udskrevet en return seddel når der bliver tryyket på udskriv.
char text1[56];
char text2[64];
char text8[64];
char text11[64];
char text12[64];
char text17[64];
Edit13->GetTextBuf(text12,56);
Edit2->GetTextBuf(text17,56);
//Edit8->GetTextBuf(text1,56); // 56 antal læste char
Edit9->GetTextBuf(text2,64);
Edit10->GetTextBuf(text8,64);
Edit11->GetTextBuf(text11,64);
ofs.open("Retur.txt",ios::out);
ofs << " " << endl;
ofs << " " << endl;
ofs << " " << endl;
ofs << " " << endl;
ofs << " " << text8 << endl;
ofs << " " << endl;
ofs << " " << endl;
ofs << " " << endl;
ofs << " x" << endl;
ofs << " " << endl;
ofs << " " << text17 << endl;
ofs << " " << endl;
ofs << " " ; // << text1; tilføj dette når text1 virker
ofs << " " << text2 << endl;
ofs << " " << text8; // << endl
ofs << " " << text11 << endl;
ofs << "" << endl;
ofs << "" << endl;
ofs << " 34100" ;
ofs << " 34101" << endl;
ofs.close();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ButtonUdskrivClick(TObject *Sender){
// Nå der trykkes på denne skal den printe de de checkbox som er TRUE
}
KODE SLUT
************************************************