//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "Unit3.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm3 *Form3;
//---------------------------------------------------------------------------
__fastcall TForm3::TForm3(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm3::Button2Click(TObject *Sender)
{
/*
DataSource1->DataSet->Edit();
DataSource1->DataSet->FieldByName("barcode")->AsString=Edit1->Text;
DataSource1->DataSet->FieldByName("picpath")->AsString=Edit2->Text;
DataSource1->DataSet->Post();
*/
//ADOQuery1->SQL->Text="INSERT INTO db.data (id,barcode,picpath,comment) VALUES (NULL,'"+Edit1->Text+"','"+Edit2->Text+"',NULL";
if(Edit1->Text=="")
{
ShowMessage("淞桎撮闶杳搜� Barcode");
Edit1->SetFocus();
}else if(Edit2->Text=="")
{
ShowMessage("淞枇� Path 觅焕揖");
Edit2->SetFocus();
}
else{
ADOQuery1->SQL->Text="INSERT INTO ephoto.master VALUES (NULL,'"+Edit1->Text+"','"+Edit2->Text+"',NULL)";
ADOQuery1->ExecSQL();
ADOQuery1->SQL->Text="SELECT * FROM ephoto.master";
ADOQuery1->Active=true;
DataSource1->DataSet->Last();
Edit1->Text="";
Edit2->Text="";
Edit1->SetFocus();
}
}
//---------------------------------------------------------------------------
void __fastcall TForm3::FormShow(TObject *Sender)
{
ADOQuery1->ConnectionString=Form1->connection;
ADOQuery1->Open();
ADOQuery1->SQL->Text="SELECT * FROM ephoto.master";
ADOQuery1->Active=true;
DataSource1->DataSet->Last();
}
//---------------------------------------------------------------------------
void __fastcall TForm3::Button1Click(TObject *Sender)
{
OpenPictureDialog1->Execute();
Edit2->Text=StringReplace(OpenPictureDialog1->FileName, "\\","\\\\", TReplaceFlags() << rfReplaceAll);
}
//---------------------------------------------------------------------------
void __fastcall TForm3::Exit1Click(TObject *Sender)
{
ADOQuery1->Close();
Form3->Close();
}
//---------------------------------------------------------------------------
void __fastcall TForm3::Button2KeyPress(TObject *Sender, wchar_t &Key)
{
if(Key==13)
{
ADOQuery1->SQL->Text="INSERT INTO ephoto.master VALUES (NULL,'"+Edit1->Text+"','"+Edit2->Text+"',NULL)";
ADOQuery1->ExecSQL();
ADOQuery1->SQL->Text="SELECT * FROM ephoto.master";
ADOQuery1->Active=true;
DataSource1->DataSet->Last();
Edit1->Text="";
Edit2->Text="";
Edit1->SetFocus();
}
}
//---------------------------------------------------------------------------
void __fastcall TForm3::Edit1KeyPress(TObject *Sender, wchar_t &Key)
{
int charcount;
AnsiString barcode;
if(Key==13)
{
charcount=CharToElementLen(Edit1->Text,14);
if(charcount==13)
{
ADOQuery1->SQL->Text="SELECT * FROM ephoto.master WHERE barcode='"+Edit1->Text+"'";
ADOQuery1->Active=true;
barcode=DataSource1->DataSet->FieldByName("barcode")->AsString;
if(barcode=="")
{
OpenPictureDialog1->Execute();
Edit2->Text=StringReplace(OpenPictureDialog1->FileName, "\\","\\\\", TReplaceFlags() << rfReplaceAll);
Button2->SetFocus();
}else{
ShowMessage("盟咽 Barcode 拐榱胀沦桡姑泻横砰�");
Edit1->Text="";
}
}else{
ShowMessage("盟咽 Barcode 荚础秘骋梳」闼凌驼·醚椐");
Edit1->Text="";
}
}
}
//---------------------------------------------------------------------------
Sourcecode-V1.0.zip_between
版权申诉
137 浏览量
2022-09-24
06:02:15
上传
评论
收藏 6MB ZIP 举报
Sourcecode-V1.0.zip_between （120个子文件） 
Project1.#00 3.42MB Project1.cbproj 8KB Unit3.cpp 4KB Unit1.cpp 2KB Unit2.cpp 1KB Project1.cpp 1KB ABOUT.cpp 839B Thumbs.db 8KB Unit3.dfm 3KB Unit1.dfm 2KB ABOUT.dfm 1KB Unit2.dfm 650B
ephoto.exe 147KB Unit3.h 2KB Unit1.h 1KB ABOUT.h 1KB Unit2.h 877B
pic.jpg 57KB Project1.cbproj.local 1KB Project1.map 246B Unit3.obj 488KB Unit1.obj 484KB ABOUT.obj 368KB Unit2.obj 52KB Project1.obj 23KB Project1.pch 14.75MB Project1.res 5KB nopic.snag 28KB Project1.tds 7.25MB Unit1.cpp.~100~ 2KB Unit1.cpp.~101~ 2KB Unit1.cpp.~102~ 3KB Unit1.cpp.~103~ 3KB Unit1.cpp.~104~ 3KB Unit1.cpp.~105~ 2KB Unit1.dfm.~106~ 154KB Unit1.cpp.~106~ 2KB Unit1.dfm.~107~ 154KB Unit1.cpp.~107~ 2KB Unit1.dfm.~108~ 154KB Unit1.cpp.~108~ 2KB Unit1.dfm.~109~ 154KB Unit3.h.~10~ 2KB Unit1.dfm.~110~ 2KB Unit1.dfm.~111~ 2KB Unit1.dfm.~112~ 2KB Unit1.dfm.~113~ 2KB Unit1.dfm.~114~ 2KB Unit1.dfm.~115~ 2KB Unit3.h.~11~ 2KB ABOUT.dfm.~1~ 1KB ABOUT.h.~1~ 989B Project1.cpp.~1~ 870B Unit2.h.~1~ 832B Unit2.cpp.~1~ 765B ABOUT.cpp.~1~ 477B Unit2.dfm.~1~ 452B Unit3.dfm.~27~ 3KB Unit3.dfm.~28~ 3KB Unit3.dfm.~29~ 3KB ABOUT.dfm.~2~ 1KB Unit3.h.~2~ 1KB ABOUT.h.~2~ 1KB Unit2.cpp.~2~ 1013B Project1.cpp.~2~ 955B ABOUT.cpp.~2~ 632B Unit2.dfm.~2~ 473B Unit3.dfm.~30~ 3KB Unit3.dfm.~31~ 3KB Unit3.dfm.~32~ 3KB Unit3.dfm.~33~ 3KB Unit3.dfm.~34~ 3KB Unit3.dfm.~35~ 3KB Unit3.dfm.~36~ 3KB ABOUT.dfm.~3~ 1KB Unit3.h.~3~ 1KB Project1.cpp.~3~ 1KB Unit2.cpp.~3~ 1KB ABOUT.h.~3~ 1020B ABOUT.cpp.~3~ 648B Unit2.dfm.~3~ 589B Unit1.h.~45~ 1KB Unit1.h.~46~ 1KB Unit1.h.~47~ 1KB Unit1.h.~48~ 1KB Unit1.h.~49~ 1KB ABOUT.dfm.~4~ 1KB Unit3.h.~4~ 1KB Project1.cpp.~4~ 1KB Unit2.cpp.~4~ 1KB ABOUT.h.~4~ 1KB ABOUT.cpp.~4~ 825B Unit2.dfm.~4~ 610B Unit1.h.~50~ 1KB Unit1.h.~51~ 1KB Unit1.h.~52~ 1KB Unit1.h.~53~ 2KB Unit1.h.~54~ 1KB Unit3.h.~5~ 1KB Project1.cpp.~5~ 1KB共 120 条
- 1
- 2
资源评论
