Moong Story

[Delphi] 델파이 산술 연산문

키워드설명예비고+더하기3 + 2 = 5 -빼기3 - 2 = 1 *곱하기3 * 2 = 6 div정수 나누기3 div 2 = 1 /실수 나누기3.0 / 2.0 = 1.5 mod나누기의 나머지5 mod 3 = 2C언어에서 %와 동일

[Delphi] edit에 숫자만 입력하기

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);begin if Key in ['0'..'9', #25, #08, #13] then else begin Key := #0; ShowMessage('숫자만 입력하세요'); end;end;

[Delphi] 날짜 관련 함수

출처 - http://andyadic.tistory.com/entry/%EB%8D%B8%ED%8C%8C%EC%9D%B4-%EB%82%A0%EC%A7%9C%EC%97%90-%EA%B4%80%EA%B3%84%EB%90%9C-%ED%95%A8%EC%88%98%EB%93%A4 uses DateUtils;// 날짜나 시간을 String으로function DateToStr(Date: TDateTime): string;function TimeToStr(Time: TDateTime): string;// 스트링을 날짜나 시간으로function StrToDate(const S: string): TDateTime;- Ex -{ var myDate : TDateTime; begin myDate := StrToDate('7..

[Delphi] TWebBrowser 스크롤바 없애기

출처 - http://bloodguy.tistory.com/333​TWebBrowser의 OnDocumentComplete에서 아래 한줄 입력​WebBrowser1.OleObject.Document.Body.Scroll := 'no';

[Delphi] 현재 날짜 구하는 함수

now는 현재의 년 월 일 시간을 리턴해주는 함수이고​FormatDateTime('yyyymmddhhnnsszzz', now)​위의 예처럼 하면 String 형으로 리턴 받을수 있다.​위의 예제처럼 하면 밀리초까지 반환된다.​추가로 now의 반환값은 double 형이다.