자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다.
- 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)
Delphi 델파이에서 mysql 테이블에 데이터를 암호화하여 저장하기
2015.07.28 20:38
안녕하세요.
델파이 xe5에서 mysql 테이블에 데이터를 저장할 때 암호화하여 저장하고 싶은데 어떤 방법들이 있는지 알고 싶습니다.
<데이터 저장하는 첫번째 방식>
ClientDataSet1.Active := True;
ClientDataSet1.Insert;
if ClientDataSet1.UpdateStatus = TUpdateStatus.usInserted then
ClientDataSet1.FieldByName('num').AsInteger := loop+1+RecordCount;
ClientDataset1.FieldByName('name').AsString := PhoneList.Strings[0];
ClientDataset1.FieldByName('phonenum').AsString := PhoneList.Strings[1];
ClientDataset1.FieldByName('grade').AsString := PhoneList.Strings[2];
if PhoneList.Strings[3] = '-' then ClientDataset1.FieldByName('class').AsString :=''
else ClientDataset1.FieldByName('class').AsString := PhoneList.Strings[3];
ClientDataSet1.Post;
ClientDataSet1.ApplyUpdates(0);
ClientDataSet1.Refresh;
ClientDataSet1.Active := False;
ClientDataSet1.Close;
<데이터 저장하는 두번째 방식>
temp := 'Insert into swphonelist(name,phonenum,grade,class) values( PhoneList.Strings[0],PhoneList.Strings[1],PhoneList.Strings[2],
PhoneList.Strings[3])';
ClientDataSet1.DataRequest(temp);
ClientDataSet1.Execute;
위의 방식으로 테이블에 데이터를 저장하는데 이때 암호화를 어떻게 해야 하는지 알려주시면 감사하겠습니다.
댓글 0
Delphi 델파이에서 mysql 테이블에 데이터를 암호화하여 저장하기
2015.07.28 20:38
안녕하세요.
델파이 xe5에서 mysql 테이블에 데이터를 저장할 때 암호화하여 저장하고 싶은데 어떤 방법들이 있는지 알고 싶습니다.
<데이터 저장하는 첫번째 방식>
ClientDataSet1.Active := True;
ClientDataSet1.Insert;
if ClientDataSet1.UpdateStatus = TUpdateStatus.usInserted then
ClientDataSet1.FieldByName('num').AsInteger := loop+1+RecordCount;
ClientDataset1.FieldByName('name').AsString := PhoneList.Strings[0];
ClientDataset1.FieldByName('phonenum').AsString := PhoneList.Strings[1];
ClientDataset1.FieldByName('grade').AsString := PhoneList.Strings[2];
if PhoneList.Strings[3] = '-' then ClientDataset1.FieldByName('class').AsString :=''
else ClientDataset1.FieldByName('class').AsString := PhoneList.Strings[3];
ClientDataSet1.Post;
ClientDataSet1.ApplyUpdates(0);
ClientDataSet1.Refresh;
ClientDataSet1.Active := False;
ClientDataSet1.Close;
<데이터 저장하는 두번째 방식>
temp := 'Insert into swphonelist(name,phonenum,grade,class) values( PhoneList.Strings[0],PhoneList.Strings[1],PhoneList.Strings[2],
PhoneList.Strings[3])';
ClientDataSet1.DataRequest(temp);
ClientDataSet1.Execute;
위의 방식으로 테이블에 데이터를 저장하는데 이때 암호화를 어떻게 해야 하는지 알려주시면 감사하겠습니다.