델파이로 mssql 데이터베이스 연결
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 | var msConnection : TMSConnection; begin msConnection := TMSConnection.Create(nil); with msConnection do begin try DisConnect; Authentication := auServer; Username := id; Password := pw; Server := serverip; Database := dbname; Connect; except on E : Exception do begin DisConnect; exit; end; end; end; end; | cs |
'IT > Delphi' 카테고리의 다른 글
델파이로 mssql 데이터베이스 데이터 가져오기 (0) | 2017.02.10 |
---|---|
mssql 에서의 image필드를 파일로 만들기 (0) | 2017.01.18 |
mssql 에서의 image필드를 파일로 만들기
MSSQL에 image type 필드에 이미지가 있는 경우 파일로 만드는 방법입니다.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 | var qryCust : TMSQuery; ms := TMemoryStream; begin qryCust := TMSQuery.Create(nil); qryCust.Connection := DBCONNECTION; ms := TMemoryStream.Create; try with qryCust do begin close; sql.text := ' select imageField from TableName '; Open; TBlobField( FieldByName('Image')).SaveToStream( ms ); ms.Position := 0; ms.SaveToFile('C:\123.jpg'); end; finally qryCust.Free; ms.free; end; | cs |
'IT > Delphi' 카테고리의 다른 글
델파이로 mssql 데이터베이스 데이터 가져오기 (0) | 2017.02.10 |
---|---|
델파이로 mssql 데이터베이스 연결 (0) | 2017.01.18 |
[테트리스5] 테트리스 소스
안녕하세요. 컴퓨터 못하는 컴퓨터공학생입니다.
델파이를 사용하여 만든 테트리스 소스를 깃허브에 올리고 깃허브 주소를 공유하려 합니다.
사실 소스를 공유한다는것 자체가 뭔가 평가 받는 느낌이 들고 ,
점수매겨지는 느낌이 들고,
쪽팔려서 공개를 안하고 싶지만..
공개를 함으로써 저나 보는 사람 둘다 도움이 됬으면 하는 바람으로 올립니다.
https://github.com/ljh3326/tetris.git
사실 원하는 기능을 다 구현하지 못하여서 조금더 수정을 할겁니다.
감사합니다.
'IT > 프로젝트' 카테고리의 다른 글
[테트리스4] 블럭 쌓기. 한줄 지우기 (0) | 2016.11.01 |
---|---|
[테트리스3] 블럭 변경하기 (0) | 2016.11.01 |
[테트리스2] 블럭 그리기, 블럭 내리기 (0) | 2016.11.01 |
[테트리스1] 개요, 설계, 화면구성 (0) | 2016.10.28 |