1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
|
Chart1->Canvas->Brush->Color=clBtnFace;
Chart1->Canvas->Font->Color=clRed;
Chart1->Canvas->TextOutA(475,290,"Condition de l'expérience : ");
Chart1->Canvas->Font->Color=clWindowText;
Chart1->Canvas->TextOutA(485,305,"- Consigne : " + EditConsigne->Text);
Chart1->Canvas->TextOutA(485,320,"- Fréquence d'échantillonnage : " + EditFrequence->Text + "Hz");
Chart1->Canvas->TextOutA(485,335,"- Durée : " + EditDuree->Text + "ms");
Chart1->Canvas->TextOutA(485,350,"- Retour d'info : ");
Chart1->Canvas->TextOutA(485,365,"- Type de correction : ");
Chart1->Canvas->TextOutA(485,380,"- Coefficient P : " + EditP->Text);
Chart1->Canvas->TextOutA(485,395,"- Coefficient I : " + EditI->Text);
Chart1->Canvas->TextOutA(485,410,"- Coefficient D : " + EditD->Text);
SaveDialog->InitialDir="%USERPROFILE%\Bureau";
SaveDialog->FileName="Sans titre";
SaveDialog->Filter="Fichier bitmap (*.bmp)|*.bmp";
SaveDialog->Execute();
Chart1->SaveToBitmapFile(SaveDialog->FileName+".bmp"); |
Partager