728x90

DELPHI 9

[커미조아] Delphi7 Comizoa Setting

문제 1. 해당 게시물은 개인적으로 고생한 설정으로 차후에도 참고 하기 위해 기록 2. Comizoa 제품의 PCI Board 사용 하는데 기존에 윈7 에서 윈10으로 업데이트 시 여러 문제점 발견 3. 기존 Win7에 "ComiDaq.ocx" 사용 하여 프로그램 개발 4. Win10으로 변경 하면서 동일하게 사용 시 드라이버와 해당 ComiDaq.ocx 사용에 충돌 및 윈도우 오류 발생 해결 1. Comizoa 에서 제공하는 Comidll.Dll,Comidll.pas(델파이 소스파일) 사용 2. 우선 Comidll.pas 파일을 사용 소스에 적용 (1) 현재 사용 Board (CP302,SD201)에 따라 .pas 파일에 소스 변경이 필요 하다. (2) SD201 Volteag 불러오는 부분에서 해당 ..

DELPHI/ETC 2023.10.23

[JSON ArrObject / Sample Source] 제이슨 배열 DATA Parsing 하기

※ Delphi 에서 Json Data Parsing 하는법은 검색 해보면 많이 있다. ※ 배열 갯수 와 배열 Data Parsing 하는 Sample Source 이다. 1. 수신 데이터 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 30 31 32 33 34 35 36 37 38 39 40 { "Parsing":[ { "Parsing1":"Parsing123030", "Parsing2":"0010", "Parsing3":"ParsingGROUP040", "Parsing4":0, "Parsing5":"Parsing001040", "Parsing6":"Lo2040", "Parsing7":"2021.02.05 11..

[delphi / TstringGrid] StringGrid 간단 문법 사용 예제

※ TstringgGrid 간단 문법 예제 이다. ※ 사용 언어 : DelphiXE3 1. 실행 화면 2. Sample Source 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 with StringGrid1 do begin ColCount := 10; FixedCols := 1; FixedRows := 1; DefaultRowHeight := 20; DefaultColWidth := 80; Cells[00,0] := '1'; Cells[01,0] := '2'; Cells[02,0] := '3'; Cells[03,0] := '4'; Cells[04,0] := '5'; Cells[05,0] := '6'; for i :=..

[델파이 / 마방진] Delphi 로 마방진 (Magic Square) 코딩 하기

※ 이것도 한참 Delphi 공부 할때 예제로 코딩하였던 예제이다. ※ 마방진이라고 왜 했는지 기억이.. 함수 공부하려고 했던 것 같다. ※ 사용 언어는 Delphi7 1. 실행 화면 ※ button Click 시 저렇게 마방진 숫자가 나오는 예제 코드 였다. 2. Sample Source 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 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 8..

[delphi / Calculator] 델파이 기반 제작 계산기 Sample Source

※ 2017년도에 이유는 모르지만 제작 했던 델파이 기반 계산기 입니다. ※ 당시에 Delphi2008로 코딩 했던것 같다. 1. 실행 화면 ※ 당시에 윈도우 계산기와 비슷하게 제작 하려고 했던 것 같다. 2. 계산기 부분 Sample Source ※ 필요 하신 부분이 있으시면 참고용으로 봐주시면 될 듯 하다. ※ 혹시 전체적인 Source 가 필요하신분은 댓글을 달아 주시면 전달 드릴 수 있도록 하겠습니다. // 숫자 클릭했을 때 function TForm_calc.NumberClick(Temp:Integer):Integer; begin // 계산 한번 끝나고 숫자입력시 All Clear if Calc_Seq = 20 then begin Btn_CClick(nil); end; // 소수점 없음 if D..

[Delphi 문법] "ExTractStrings" 간단 예제

※ 사용 하고있는 문법 중 추후 찾아 보기 용이하게 간단하게 기록 및 필요 한 사람을 위한 기록 ※ ExTractStrings 문법 사용시 Parsing 갯수를 고정으로 가져가기 때문에 코딩 시 주의 - 실행 화면 1) 간단 예제 실행 화면 ** - 실행 전** ** - 실행 후** 2) Sample Source begin try sWords := TStringList.Create; strtemp := edt_msg.text; if ExTractStrings(['/'], [], PChar(strtemp), sWords) = 0 then Exit; sWhere := ''; edt_parsing1.Text := sWords[0]; edt_parsing2.Text := sWords[1]; edt_parsing..

[델파이]기본개념 - 2 [클래스, 트랜잭션, Exception]

1. 매개변수 전달 방법 - 값으로 넘기는 경수 Call by value n Function add(x,y : integer) : integer; Var J,I : integer; I := 3; J := 2; Begin Add(I,j); End; - 상수 값으로 넘기는 법 - Call by Reference 2. 클래스 - 클래스는 속성과 행위를 갖는 레코드형과 마찬가지로 일종의 자료형(Type)입니다. - 클래스 형으로 정의한 변수는 그 자체가 개체(오브젝트)가 되는 것이 아니라 메모리에 자리잡기 위해서는 인스턴스 하는 작업이 필요한데 이를 생성(Create)이라고 한다. 내부적으로 데이터와 메소드를 가지고 있습니다. 클래스는 Type 절에서 선언 한다. - 클래스를 선언할 때는 예약어 Cless를 사..

[델파이] 기본 개념 -1 [프로젝트, 함수, 프로시저]

공부하면서 나중에 생각 안나면 보려고 혼자 끄적이는 기록 입니다. 델파이 기본 1. 프로젝트파일 - 프로젝트 확장자 파일은(.Dpr(ver.10~) .Dproj(ver.2009~)[MS빌드옵션정보포함 되어 있는 확장 자 이며, 그로 인하여 파일 용량이 크다]) 프로그램의 메인 으로 다른 유닛이나 폼들을 포함하는 총 연결 파일이다. - 메인 이지만 많은 코딩은 하지 않는다 2. 프로젝트관리 - New Form을 하면 폼 파일(*.dfm)과 유니트(*.pas)파일이 추가 된다. - 폼파일은 화면에 대한 정보(폰트, 크기, 색상 등)를 가지고 있는 이진 파일로 델파이 5.0부터 텍스트 파일로 저장된다. - 유니트 파일은 상수,변수,타입,프로시저나 함수 등을 코딩하는 소스 이다. - 주로 코딩하는 곳이 유니트 ..

728x90