반응형 C++ MFC 글 STATIC 글자 색깔 바꾸기 STATIC 우클릭 - 클래스 마법사에서 아래 처리기를 추가해준다 그리고 아래를 추가해준다 HBRUSH CPJTTecheyePressDlg::OnCtlColor(CDC* pDC, CWnd* pWnd, UINT nCtlColor) { HBRUSH hbr = CDialogEx::OnCtlColor(pDC, pWnd, nCtlColor); // Fail Count 글자색 if (pWnd->GetDlgCtrlID() == IDC_STATIC_FailCnt) { pDC->SetTextColor(RGB(255, 0, 0)); } return hbr; } return hbr; } 2023. 12. 13. Inventor 설치 순서 보호되어 있는 글 입니다. 2022. 4. 1. 재무정보 보호되어 있는 글 입니다. 2021. 12. 3. MS SQL 2012 설치하기 https://www.microsoft.com/ko-kr/download/details.aspx?id=56042 Microsoft® SQL Server® 2012 SP4 Express Microsoft® SQL Server® 2012 Express는 간단한 웹 사이트 및 데스크톱 응용 프로그램에 다양하고 안정적인 데이터 저장소를 제공하는 강력하고 안정적인 무료 데이터 관리 시스템입니다. www.microsoft.com 위에 거 중에 위에 3개는 그냥 버전? 같은거 위에 3개 중에 아무거나 깔고 맨아래 SQLManagementStudio 깔면됨 아래는 관리프로그램 약간 뷰어? 같은거임 2021. 7. 23. 왕초보팁 [펌] http://www.delmadang.com/community/bbs_view.asp?bbsNo=3&bbsCat=0&indx=435748&page=2 목차 1. 데이터 저장 및 누적 2. RGB Color 색상값 이용하기(레드 그린 블루) 3. 최소화 비활성화(프로퍼티에도 있음) 4. 라벨 글자위치 정가운데 5. MonthCalendar에서 날짜 클릭시 그 날짜를 에디트박스에 불러온다. 6. 에디트박스에 통화표시(콤마) 찍는 방법 7. 한글/영어모드 전환 8. MonthCalendar를 오늘 날짜로 셋팅 9. 프로그램 시작시 에디트박스에 초점 맞추기 10. Stringgrid 모든셀 가운데 정렬 11. StringGrid 셀에 내용 넣는 방법 12. Form2 띄우는 방법(새창 띄우기) 13. 에.. 2020. 4. 8. LV32-BLDC Manual 매뉴얼 LV32-BLDC ManualLV32-BLDC 매뉴얼시스웍 2019. 2. 5. HEX 실수 변환 Edit1.Text := IntToStr(D[0]); Edit2.Text := IntToStr(D[1]); H[0] := IntToHex(D[0],1); H[1] := IntToHex(D[1],1); Edit3.Text := H[0]; Edit4.Text := H[1]; Edit5.Text := H[1]+H[0]; i := StrToInt('$'+H[1]+H[0]); Edit6.Text := IntToStr(i); f := pSingle(@i)^; Edit7.Text := FloatToStr(f); 2018. 9. 4. 진동센서 BANNER QM42VT2 진동센서 BANNER QM42VT2 설정방법 1. 준비물 - RS232 to 485 시리얼변환 - SMPS 2. 배선이름 - turck rkc4.4t-2/tel 3. 배선방법WHITE TX+BLACK TX-BROWN 24VBLUE 0V 4. 센서 확인 툴 배선 연결하고 진동 측정하면진동값이 1초마다 기록된다메모장으로도 출력할 수 있음 2018. 6. 22. PC 핫스팟 실행 netsh wlan show drivers netsh wlan set hostednetwork ssid=하고싶은이름 netsh wlan set hostednetwork mode=allow netsh wlan set hostednetwork key=비밀번호 netsh wlan start hostednetwork 2018. 4. 5. 배열 연습 1. 1부터 입력받은정수까지 중 홀수의 합 2. 정수형 배열 10개 크기 선언(정수 0으로 세팅) 3. 0이아닌 임의 5개 정수를 배열 첫자리부터 순차적립첫자리부터 5개까지의 수를 순차적으로 출력 4. 0이아닌 임의 5개 정수를 배열 첫자리부터 순차적립 카운트다운하여 그 수를 출력(for A downto B do구문) 5. 0이아닌 임의 5개 정수를 배열 첫자리부터 순차적립첫자리부터 개수 5개까지의 수를 합산하여 출력 2017. 7. 26. CAS CI-1500A 시리얼통신 CAS CI-1500A 시리얼통신 1. 모듈 설정 용기버튼을 누르고 전원을 켠다 변환모드(Set표시) F01 = 0 F02 = 0 F03 = 2 -> 시리얼사용시 F05 = 5 -> 무게재는속도 F06 = 0 F07 = 0 F08 = 0 F09 = 0 F10 = 48 -> 주고받는프로토콜 정해주는거 아스키코드값 0 F11 = 4 -> 통신속도 9600 F12 = 3 -> 시리얼통신 사용하겠다 F13 = 0 F14 = 0 2. D-SUB 커넥터 배선연결 CAS쪽 : 2번, 3번, 7번 PC쪽 : 2번, 3번, 5번 3. 프로그램 소스 procedure TForm1.OPENClick(Sender: TObject); begin ComPort1.Open; end; procedure TForm1.ReadClick.. 2017. 7. 19. 채팅프로그램 채팅 주고받는 이더넷통신 프로그램 예제입니다. 2017. 7. 18. TXT -> CSV 파일변환 보호되어 있는 글 입니다. 2017. 6. 23. 델타옴 HD2817 모듈 보호되어 있는 글 입니다. 2017. 6. 16. Q80BD-J71GP21-SX 멜섹넷 CCLINK-IE설치 멜섹넷 CCLINK IE 설치 하려고 하면 에러가 난다.-_- 뭐하나 쉬운게 없고 아는거도없고 Q80BD-J71GP21-SX , SW1DNC-MNETG-B 설치하려고 하면보안 업데이트 KB3033929가 안깔려있다고아래와 같은 메세지 창이 뜬다.그래서 다운 받아서 깔아봤더니 이미 설치되어있댄다난 설치도 안했는데 설치되어있다고하고그래서 아래 블로그에서 해결책을 찾았다. 7zip을 다운받구 업데이트 파일을 압축 풀어서 2017. 6. 5. YASKAWA MP2100, MPE720 모든것 ■ 주제 : YASKAWA MP2100 모든것1. 서론이 글을 누가 읽을지는 모르겠지만 나같이 앞이 캄캄한 야스카와 입문하는 분들을 위해 남겨둡니다.편하게 반말을 사용합니다.참고로 난 아무것도 모르고 달려들었고, 도움을 받지 못했다.경험으로 알아낸 것이므로.. 알아서 판단하고 참고하길 바란다.2. 목표야스카와 MP2100 시리즈로 PC를 이용한 YASKAWA 서보모터 제어 3. 준비물기본적인 : PC, MP2100 보드, 서보드라이버, 서보모터프로그래밍툴 : MPE720 Ver 7.723, YASKAWA Motion API Ver 1.70매뉴얼 자료들그리고 노력과 시간아직 MP2100 보드를 구입하지 않았다면 아래를 참고해서 구입하기 바란다.Motion Board 선정편 http://hopot.tisto.. 2017. 6. 4. 숫자의 합 구하기 수정버전 1 Edit, Listbox 사용임의의정수는 20이하 입력받아 정수를 그대로 출력 1개의 정수를 입력받아 0이 될때까지 카운트 다운카운트 다운 될때마다 그 수를 출력 1개의 정수를 입력하여 1부터 그 정수까지의 합을 구함 1개의 정수를 입력하여 1부터 그 정수까지 중의 짝수들의 합을 구함 Edit에 0이 입력 될대까지 Hello, Delphi 문구가 Listbox에 계속 출력 타이머 사용 2017. 6. 3. Edit Enter키 입력시 다른Edit로 이동 2017. 5. 30. LABEL 로 창 움직이기 Label을 클릭하고 창을 마우스로 움직일 수 있게 만들기망고 애플 앵무새 Label1 을 만들고, Mousedown 이벤트를 만든다. procedure TForm1.Label1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);const SC_DragMove = $F012;begin ReleaseCapture; Form1.perform(WM_SysCommand, SC_DragMove,0);end; 끝. 2017. 5. 30. 메모장 만들기 델파이 입문 2개월차에 메모장을 만들어보려고 합니다. 소스를 부분 부분 필요한 부분을 공유하고 싶어서 부분 부분 주제별로 소스를 올려요 모두다 테스트해보고 올리는 것입니다 그리고 소스는 델마당에서 모두 찾아내었습니다. 그림이 없어서 잘 모르겠다 싶으신 분들은 '메모장'을 실행하시고 보세요. 메모장 실행방법 : '윈도우키 + R' -> 'notepad' 치고 + 엔터 먼저 메모장은 MainMenu 라는 것을 사용합니다 (메뉴바) 1. 메뉴바 - 파일 탭 MainMenu에서 구분선을 넣으려면 MenuItem 의 Caption에 ' - ' 2017. 5. 25. Delphi 유용한 사이트 유용한 델파이 사이트 programming 2006.09.22. 16:48http://blog.naver.com/2sim2/140029035088번역하기 전용뷰어 보기http://delphiforfun.org/ 많은 델파이 예제를 다루고 있으며, 상당히 어려운 부분에 대해서도 기술하고 있습니다. 문제는 영어로 된 사이트라는 것이지만, 프로그램과 소스가 있어서, 델파이 코드를 뒤져볼 수 있으면 짧은 영어에도 많은 것을 배울 수 있습니다. http://www.cobans.net/ RPN 파서라던가 혼자 플레이하는 테트리스 그리고 프렉탈 등등의 여러가지 내용들이 있습니다. 러시아 대학생이 만든 사이트. http://www.koders.com/ 상당히 많은 소스를 제공하는 사이트입니다. 어지간한 소스는 다 있다.. 2017. 5. 24. Tower Lamp Blink TOWER LAMP 옵션 만들기 - 사용자가 옵션으로 체크박스에 설정을 해두면 그에 따라 Tower Lamp가 동작하는 기능 1. Panel 생성 Tower lamp 모양으로 Panel 을 3개 생성한다.Tower Lamp 에 필요한 색상 빨 : 켜짐(clRed), 꺼짐(clMaroon)노 : 켜짐(clYellow), 꺼짐(clOlive)초 : 켜짐(clLime), 꺼짐(clTeal) 2. 옵션 생성사용자가 옵션을 선택할 수 있도록 CheckBox 를 위와 같이 만든다. 3. 소스TowerLamp 변수 - 1 : 대기상태 - 2 : 구동상태 - 3 : 알람상태 - 4 : PIO상태 전역변수 설정해준다 var TowerLamp : integer; 0일때 TowerLamp 빨,노,초 모두 꺼준다 // Tow.. 2017. 5. 24. CCLINK 세팅 방법 CCLINK 유틸리티를 실행한다. 파라미터 세팅 탭에 들어간다. Station 번호를 0으로 변경한다통신속도를 2.5Mbps로 변경한다Mode를 Ver.2 로 변경한다 총 연결 개수를 변경한다실제 연결되어있는 CCLINK 모듈의 개수를 선택한다우측의 접점을 CCLINK 모듈 종류에 따라 선택한다16점 짜리, 32점 짜리 INPUT, OUTPUT 공통 모듈 16+16점 짜리도 32point 로 하고 16점짜리 모듈은 16point 선택한다 DIP Switch 세팅방법 2.5Mbps = B RATE 2번 ON Station 번호 16번 = 10 ON, 4 ON, 2 ON 종단 저항 연결 방법 검정색 저항을...PC의 PCI보드에 DA+DB에다가 연결 CCLINK 맨 마지막 단에도 DA + DB 사이를 연결한다 2017. 5. 18. PC 상세 내용 리오인터네셔날CPU i5-4590 3.30GhzRAM 4GBWin7 32bit professtional KSSD 128GBHDD 1TBCCLINK PCI Q80D-J61BT11NYASKAWA PCI JADMC-MC2102T-E(MECAIII) 또는 JAPMC-MC2140MOXA OPT8-M9ETHERNET IPTIME PX1000WIRELESS IPTIME A2000UHUB IPTIME H508HUB V1410-16G(J9662A)-16PORTSOUND ASUS XONAR DG7.1SOUND FS-S5 FOHENZWIFI IPTIME A604SERIAL C168H/PCI YASKAWAPC-DRIVE CABLE : JEPMC-W6012-01-EDRIVE-DRIVE : JEPMC-W6012-A3-E회생저항 .. 2017. 5. 10. 0~9999 숫자 중 3이 포함된 숫자를 구하기 0에서 9999까지 숫자 중 3이 한번이라도 포함된 숫자를 구하고그 숫자가 몇개가 있는지 레이블에 표시하기 2017. 5. 9. Accura 2300 델파이 모듈 통신타입 : Modbus TCP/IPIP : 10.10.10.100PORT : 502 엑셀문서는 Accura 2300 Modbus Map 입니다.추가로 모니터링할 부분이 있을 때 참고 2017. 5. 8. ASCII to HEX Delphi 모듈 아스키코드를 16진수로 변환해주는 소스 주석달기를 하고있습니다. str:PAnsiChar에서 PAnsiChar이란 어떤 형태인지 궁금합니다.. 검색해봐도 찾을수가 없어서 질문 올립니다. function ASCIItoHEX(str:PAnsiChar; Len:Integer):string; var _str : string; i : Integer; begin _str := ''; //_str초기값 셋팅 for i:=0 to len -1 do begin _str := _str + IntToHex(Ord(str[i]),2);//Ord : 아스키코드값을 10진수로 변환 end; Result := _str;end; 2017. 5. 8. MOXA 보드 CP-118U RS-232설정하기 일단 목사 갖다 버려이거때문에 6시간 개고생 헤맸음결론은 이 목사보드로 RS-232 통신을 하려면아래 사진 우측위에 파란 딥스위치 S3을 다 ON으로 올려야한다. 항상 매뉴얼을 봐야한다는거...안보고 그냥 하려고 했다가통신 안뚫려가지고괜히 D-sub 커넥터 납땜만 몇번 하고 아오.... 2017. 4. 27. 진수변환 ■ 16진수 → 10진수 procedure TForm1.Button1Click(Sender: TObject);begin Edit2.Text := IntToStr(StrToInt('$'+Edit1.text));end; ■ 16진수 → 10진수 procedure TForm1.Button1Click(Sender: TObject);begin Edit2.text := IntToHex(StrToInt(Edit1.Text),1); // 숫자는 자리수를 표시해준다.end; * 참조 : http://www.delmadang.com/community/bbs_view.asp?bbsNo=17&bbsCat=41&indx=366555&keyword1=%C1%F8%BC%F6%BA%AF%C8%AF&keyword2= ■ 10진수 → .. 2017. 4. 11. RF 리더 프로그램 1. USB to Serial 2. Program 준비물 : ACR1281S-C8, USB to Serial/Driver, RF Tag 1. Form1에 아래와 같이 버튼과 Comport를 만듭니다. Comport의 인스펙터에서 BaudRate를 br9600으로 변경Port를 장치관리자에서 확인해서 USBtoSerial을 확인한다. Comport의 Events에서 아래와 같이 두개의 프로시져를 생성한다.(더블클릭) procedure TForm1.ComPort1AfterOpen(Sender: TObject);begin ListBox1.Items.Add('Connected'); ComPort1.ClearBuffer(True ,True);end; procedure TForm1.ComPort1RxChar(Sen.. 2017. 4. 11. 이전 1 2 3 다음 반응형
