Delphi 시작 구문 1

4987 단어 Delphi

주석:

    //  
    {        }
    *        *

변수 선언:

var i:integer;
var X,Y:Real;

기호 상수 선언

const 
   PI=1000;
   HH: integer=100;

선언 파일 및 배열

F:File of TCurveData;
Data:array of TCurveData;

연산자
산술 연산자:

+，-，*，/，div,mod    
 //  ，/    ，     。div   ，     。mod  ，     。

논리 연산자

not,and,or,xor         
//  ，and   ，or   ，xor    ，not    。    true false。

관계 연산자

=,<>,<,>,<=,>=         
//      <>,C     !=.

대입 연산자

i := i+1;  
Edit1.Text:='Hello';   
//delphi :=     ，=       。

조건문
1:if 문

begin if (i mod 39)=0 then memo1.lines.add(inttostr(i));
end.

var x,y:integer;
begin
if x>0 then
   y:=2*x;
   else 
   y:=1-2*x;
   writenln('y=',y);
   end.

2:case 문장

  case i of 
     1:writeln('one');
     2:writeln('two');
     3:writeln('three');
    else 
      writeln('other number');
  end;

순환문
1:for 주기

begin DT:=0.01;
   for I:=-500To 500 do begin X:=DT*I;
   Y:=10*cos(4*X);
   Chtcurve.series[0].AddXY(X,Y);
end;

2:repeat과while...순환

repeat
      ;
until(    ;)

while (    ) do
 begin
      ;
 end;

상용문

1：Memo2.lines.add(floattostr(K));     
//   K       ，    memo2 。
2：x:=strtoint(edit1.text);     
// edit1               x。
3：delphi    ：label5.Caption:=datetimetostr(now);  
//timer  
       ：timer1.enabled:=false;
       ：timer1.Enabled :=true;
4：power(x,n)   x n

이 내용에 흥미가 있습니까?

현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:

[Delphi] TStringBuilder

그리고 꼭 사용해야만 할까? 그림처럼 Heap 영역에 "Hello" 공간을 생성하고 포인팅을 한다. "Hello World" 공간을 새로 생성한 후 포인팅을 하게 된다. 결국 "Hello" 라는 String 객체가 ...

텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.

CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.

좋은 웹페이지 즐겨찾기

개발자 우수 사이트 수집

개발자가 알아야 할 필수 사이트 100선 추천 우리는 당신을 위해 100개의 자주 사용하는 개발자 학습 사이트를 정리했습니다