Q&A
- 06-2000 -> june2000 으로 바꾸는법
안녕하십니까?
델파이언 여러분..
아주 단순한데..
date 함수를 쓰면 주로 06-2000 혹은 6월 2000년
이렇게 나오지요..
그런데 6월을 june 로 바꾸어서 나오게 하는법은
업나요?
한글 델파이라서 원래 없는지
아님 제가 몰라서 그런지
(아무래도 후자 같아요..)
아시는문 알려주세요
간단히 다시 말하면
월을 영문으로 가져오고 싶어요..
그럼 여러 고수님들 한수 지도좀 바랍니다...
델파이언 여러분..
아주 단순한데..
date 함수를 쓰면 주로 06-2000 혹은 6월 2000년
이렇게 나오지요..
그런데 6월을 june 로 바꾸어서 나오게 하는법은
업나요?
한글 델파이라서 원래 없는지
아님 제가 몰라서 그런지
(아무래도 후자 같아요..)
아시는문 알려주세요
간단히 다시 말하면
월을 영문으로 가져오고 싶어요..
그럼 여러 고수님들 한수 지도좀 바랍니다...
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- 미지수
- 2000.06.13 18:29
- 0 COMMENTS
- /
- 0 LIKES
-
-
- psunk
- 2000.06.13 17:50
- 0 COMMENTS
- /
- 0 LIKES
-
- 다빈
- •
- 2000.06.13 10:30
- 4 COMMENTS
- /
- 0 LIKES
-
최영근•2000.06.13 11:03다빈 wrote: > 버튼 클릭시 실행파일(다른 프로젝트파일의 실행파일)을 열고 > 싶은데(*.EXE) 어떻게 해...
-
다빈•2000.06.13 11:43그런데요... winexec로 열린 파일을 다시 열려고 할
-
이수정•2000.06.14 12:19안녕하세요... 코드는 모르구요... 여기 자료실에.. 최용일님이신가.. 실행파일 중복실행 방지용...
-
최영근•2000.06.13 21:26다빈 wrote: > 그런데요... > winexec로 열린 파일을 다시 열려고 할
-
- 어린왕자
- •
- 2000.06.13 08:57
- 3 COMMENTS
- /
- 0 LIKES
-
이준해•2000.06.13 18:29다음 순서대로 작업해 보세요. 1. TButton의 SuperClass로 하는 원하는 Class를 만드세요.(TMyButton이라 ...
-
어린왕자•2000.06.13 18:42> 2. 만들어진 Class(VCL Component가 되겠죠)를 등록하세요 꼭 등록해야하나요? 동적으로 사용하면 안되...
-
이준해•2000.06.13 19:12TTabSheet라면 쉽진 않을 것 같네요. 정석대로라면 다음 작업을 해야 할 것 같습니다. 1. TTabSheet ...
-
- 김동식
- •
- 2000.06.13 08:50
- 1 COMMENTS
- /
- 0 LIKES
-
조규춘•2000.06.13 14:34김동식 wrote: > 델파이로 하드웨어 제어용 DLL 제작이 가능한지 알고싶군요. 하드웨어 제어용 DLL 제...
-
- 아리엘
- •
- 2000.06.13 08:10
- 1 COMMENTS
- /
- 0 LIKES
-
이준해•2000.06.13 18:32TQRExpress 에는 필드명을 주는 것으로 알고 있습니다. 양쪽에 큰괄호를 하고 필드명을 주세요 "[field1]...
-
- 이태수
- •
- 2000.06.13 07:37
- 1 COMMENTS
- /
- 0 LIKES
-
양병규•2000.06.13 10:02StringReplace로 Tab문자를 콤마로 바꿔서 TStrings의 CommaText로 대입하면.. 탭을 구분으로해서 TString...
-
- 어린왕자
- •
- 2000.06.13 07:37
- 2 COMMENTS
- /
- 0 LIKES
-
조규춘•2000.06.13 14:53어린왕자 wrote: > 안녕하세요..어린왕자입니다.. > 질문있습니다.. > 디비그리드와 데이타소스와 ADODa...
-
어린왕자•2000.06.13 16:34규춘님 답변 잘봤어요.. 음.. 저가 할려는 의도는 그 결과창을 계속 띠워놓구 싶거든요? 그리드 결과 창...
-
- 이재명
- •
- 2000.06.13 07:06
- 1 COMMENTS
- /
- 0 LIKES
-
모승열•2000.06.14 01:55이재명 wrote: > 개념 그래프를 이용하여 자연어 검색 및 저장 프로그램을 작성중입니다. > 생성된 변수...
-
- 느티나무
- •
- 2000.06.13 06:47
- 1 COMMENTS
- /
- 0 LIKES
안녕하십니까? 델파이언 여러분.. 아주 단순한데.. date 함수를 쓰면 주로 06-2000 혹은 6월 2000년 이렇게 나오지요.. 그런데 6월을 june 로 바꾸어서 나오게 하는법은 업나요? 한글 델파이라서 원래 없는지 아님 제가 몰라서 그런지 (아...-
서경환•2000.06.13 07:18제가 보기에는 제어판의 국가별 설정에 따라서 표시되는 방법이 틀린 것 같습니다. 아래의 소스를 참고하...
-
- 초보
- 2000.06.13 06:37
- 0 COMMENTS
- /
- 0 LIKES
-
- 박대규
- •
- 2000.06.13 06:30
- 1 COMMENTS
- /
- 0 LIKES
-
서경환•2000.06.13 06:56다른 윈도우에 변수를 잡고 public { Public declarations } vi_cursor:integer; begin if Scre...
-
- 선희
- •
- 2000.06.13 05:38
- 1 COMMENTS
- /
- 0 LIKES
-
서경환•2000.06.13 06:2117082 참조하면 될 것 같은데 테스트 해보았음... 선희 wrote: > MDI폼으로 프로젝트를 진행중인데 >...
-
- azure
- •
- 2000.06.13 04:57
- 1 COMMENTS
- /
- 0 LIKES
-
서경환•2000.06.13 05:33StringGrid를 클릭하면 해당 로우의 데이타(키)를 읽어와서 Select문을 다시 쓰는것이 한 방법인데... 더 ...
-
- 어린왕자
- •
- 2000.06.13 04:50
- 1 COMMENTS
- /
- 0 LIKES
-
이준해•2000.06.13 18:36Class를 만들어 사용한다고 속도가 느려지지는 않습니다. TList 라는 Class 를 사용하세요. 쬐금 손봐서 ...
-
- 배훈
- •
- 2000.06.13 04:30
- 2 COMMENTS
- /
- 0 LIKES
-
서경환•2000.06.13 05:30DBE Administrator에서 Configuration --> Drivers --> Native --> Oracle --> VENDOR INIT를 ORA8(비슷한...
-
배훈•2000.06.13 06:23서경환 wrote: > DBE Administrator에서 Configuration --> Drivers --> Native --> Oracle --> VENDOR IN...
-
- 이창영
- •
- 2000.06.13 03:57
- 1 COMMENTS
- /
- 0 LIKES
-
이승우•2000.06.13 05:47이창영 wrote: > 안녕하세요! > 프로그램 인스톨되고 제어판의 odbc에서 추가하면 문제가 없는데 > 그런...
-
-
이언주•2000.06.13 06:18퀵리포트에서 미리보기에서 printer setup에서 인쇄할 페이지라고 ~에서 ~까지라고 설정하는 부분이 있습니...
-
지연•2000.06.13 17:54답변은 고맙습니다... 그런데 제가 올린 질문을 자세히 안 읽어 보셨나봐요... 답변해 주신것처럼 페이지...
-
-
- 이창영
- •
- 2000.06.13 03:50
- 1 COMMENTS
- /
- 0 LIKES
-
조규춘•2000.06.13 14:24이창영 wrote: > 안녕하세요! > 프로그램 인스톨되고나서 바탕화면에 바로가기 아이콘을 > 자동으로 만...
아래의 소스를 참고하면 되지 않을까요
Multi Language Applications
Eddie Shipman
For anyone needing to do multi-language apps and don't want to write a lot of code checking what language the program is running, see below. I compiled a stringtable resource into my exe and this is how I used it for multi-language dialogs.
Instead of using the Runtime directives to check what language, I used a runtime variable to set the index for the messages into the stringtable and then load the messages from there depending upon the language. You could also create different stringtables for each language and then compiling them in by using the compile directives.
Here is some example code, give it a try:
--------------------------------------------------------------------------------
unit French1;
interface
uses
SysUtils, WinTypes, WinProcs, Messages, Classes, Graphics, Controls,
Forms, Dialogs, StdCtrls, IniFiles;
type
TForm1 = class(TForm)
Button1: TButton;
procedure FormActivate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
StringIndex : Integer;
implementation
{$R *.DFM}
{$R MULTLANG.RES}
{ Here is the way the resource file for this project looks:
1, "Attention"
2, "No Condition definition selected!"
3, "Always"
4, "Cannot delete the 'always' condition."
5, "Confirmation"
6, "Delete the condition?"
7, "Yes"
8, "No"
9, "Attention"
10, "Pas de condition Selectionn?"
11, "Toulours"
12, "Ne peux effacer la condition 'Toujours'"
13, "Confirmation"
14, "Effacer cette condition?"
15, "&Oui"
16, "&Non"
}
procedure TForm1.FormActivate(Sender: TObject);
var
{inifile : TIniFile; Optional}
ProgramLanguage : String;
begin
{ Here, I just set it to French }
ProgramLanguage := 'fra';
{ You can optionally get the language from Win.INI:}
{inifile := TInifile.Create('WIN.INI');
ProgramLanguage := inifile.ReadString('intl', 'sLanguage', 'enu');
inifile.Free;}
{ Forgive me if I leave out any languages, Tthese are th only ones
in my setup.inf for my copy of Windows.
dan = Danish
nld = Dutch
enu = English (American)
eng = English (International)
fin = Finnish
fra = French
frc = French Canadian
deu = German
isl = Icelandic
ita = Italian
nor = Norwegian
ptg = Portuguese
esp = Spanish
esn = Spanish (Modern)
sve = Swedish
}
if ProgramLanguage = 'enu' then
begin
StringIndex := 0;
end
else
if ProgramLanguage = 'fra' then
begin
StringIndex := 8;
end;
end;
procedure TForm1.Button1Click(Sender: TObject);
var
i,j,k : integer;
DialogForm : tform;
begin
Application.NormalizeTopMosts;
{no Condition Selected!}
DialogForm := CreateMessageDialog(LoadStr(StringIndex+2),mtWarning,[mbOK]);
{Attention}
DialogForm.caption := LoadStr(StringIndex + 1);
DialogForm.showmodal;
Application.RestoreTopMosts;
{Cannot Delete the 'always' condition}
DialogForm := CreateMessageDialog(LoadStr(StringIndex+4),mtWarning,[mbOK]);
{Always}
DialogForm.caption := LoadStr(StringIndex + 3);
DialogForm.showmodal;
Application.RestoreTopMosts;
{Delete the condition?}
DialogForm := CreateMessageDialog(LoadStr(StringIndex+6),mtInformation, [mbYes, mbNo]);
{confirmation}
DialogForm.caption := LoadStr(StringIndex + 5);
for j := 0 to DialogForm.controlCount-1 do
begin
if DialogForm.controls[j] is tButton then
with tButton(DialogForm.controls[j]) do
begin
if caption = '&Yes' then caption := LoadStr(StringIndex+7);
if caption = '&No' then caption := LoadStr(StringIndex+8);
end;
end;
DialogForm.showmodal;
end;
end.
느티나무 wrote:
> 안녕하십니까?
> 델파이언 여러분..
> 아주 단순한데..
> date 함수를 쓰면 주로 06-2000 혹은 6월 2000년
> 이렇게 나오지요..
> 그런데 6월을 june 로 바꾸어서 나오게 하는법은
> 업나요?
> 한글 델파이라서 원래 없는지
> 아님 제가 몰라서 그런지
> (아무래도 후자 같아요..)
> 아시는문 알려주세요
>
> 간단히 다시 말하면
> 월을 영문으로 가져오고 싶어요..
>
> 그럼 여러 고수님들 한수 지도좀 바랍니다...