반응형 IT/델파이45 [Delphi] 워터마크 표시와 이미지 줄이기 * 목차 * 1. 개요 2. 상세내용 3. 소스 설명 4. 프로그램실행 시 동작화면 5. 변환된 이미지 모습 1. 개요 델파이를 이용한 이미지 크기조정과 워터마크 표시. 2. 상세내용 글을 올리다 보니 사진을 올리 때가 있다. 그럴 때 이미지 크기도 변경해야 하고 워터마트도 추가해야 했다. Tstory 에서 워터마크 표시 하는 부분이 있는데 맘에 들지 않아 간단하게 만들어 보았다. 3. 소스 설명 Uses 추가 Vcl.GraphUtil, Vcl.ExtCtrls 1. 워터마크 소스안에 설명을 달아 놓았다. 자기가 원하는 데로 수정해서 올리면 된다. Mkxmax := Trunc(Image321.Width / Mklen ) // 이미지 에서 표시라 가로 개수 Mkymax := Trunc(Image321.Hei.. 2023. 11. 10. 투명 PNG 이미지를 투명하지 않은 다른 이미지 포멧으로 저장하기 1. 개요 투명한 PNG 이미지를 투명 배경을 흰색 바탕으로 처리한 다른 이미지로 저장해 보자. 2. 증상 분석 투명 PNG 이미지를 투명부분을 흰색 배경으로 처리한채 다른 이미지포멧(BMP 또는 JPG)로 저장하고자 할 경우에 일반적으로 다음 과 같은 방법을 시도하여 변환을 시도할 것이다. var bmp : TBitmap; jpg : TJpegImage; png : TPngObject; begin try bmp := TBitmap.Create; jpg := TJpegImage.Create; png := TPngObject; png .LoadFromFile(APngFileName); bmp.Assign(png); jpg.Assign(bmp); jpg.SaveToFile(AJpegName); finally.. 2023. 2. 15. TcxGrid에서 Popup메뉴 열리기 전에 클릭된 컬럼 및 종류 알아내기 TcxGrid에서 오른쪽 마우스 클릭시 설정된 팝업메뉴 오픈 전에 클릭된 컬럼의 종류(헤더, 본문, 풋터) 및 클릭된 컬럼 인덱스를 알아내는 방법 procedure TForm1.cxGridPopupMenu1Popup(ASenderMenu: TComponent; AHitTest: TcxCustomGridHitTest; X, Y: Integer; var AllowPopup: Boolean); var AColumnIndex: integer; begin // only allow column popup when this column is hit AColumnIndex := cxGrid1TableView1Column4.Index; // Cell was hit if AHitTest is TcxGridRecordCel.. 2023. 2. 15. TRichEdit에서 전체선택(CTRL+A)시 문서 끝으로 자동 스크롤 시키기 1. 개요 TMemo 컴포넌트 에서는 기본적인 컨텍스트 메뉴인 전체선택(CTRL+A)시 본문 내용이 전체 선택 되면서 문서의 끝으로 자동 스크롤 되지만 TRichEdit 컴포넌트에서는 전체 선택시 문서 끝으로 자동 스크롤 기능을 제공하지 않는다. 따라서 필요에 의해서 전체 선택시 문서의 끝으로 이동하도록 구현해 보자 2. 전체선택(CTRL+A)시 문서 끝으로 자동 스크롤링 // Richedit1.SelStart :=RichEdit1.GetTextLength; // 2023. 2. 15. 이전 1 2 3 4 5 6 7 ··· 12 다음 반응형
