Q&A

  • 비주얼베이직소스를 델파이로 어떻게 변환하나요
안녕하세요 고수님들 우선 제글을 봐주셔서 감사합니다.
다름이아니오라 현제 비줄얼베이직소스를 델파이로 변환할려구하는데 폼을 두개만들어서 제가해봤습니다. 그런데 메인폼에서 에디트박스에 숫자를 넣고 메인폼 확인버튼을 눌르면 두번째폼에서 숫자하고 결과값이나와야하는데 도저희 제머리로는 소스를변환하는것은 안됩니다. 고수님들 제발 도움을 주세요
ㅠ.ㅠ 부탁드립니다
비주얼베이직소스 입니다~
Function sum(a As Integer) As Integer
Form1.Cls
hap = 0
For i = 1 To a
    Form1.Print i;
    hap = hap + i
    If i Mod 10 = 0 Then
        Form1.Print
    End If
Next i
Form1.Print
Form1.Print
sum = hap '함수명에 최종값을 대입
End Function
Private Sub Form_Load()
Form1.AutoRedraw = True
Dim b As Integer
b = InputBox("목적치의 수를 입력하시오", "수 입력")
If b = 0 Then End
hap = sum(b) '함수 프로시저를 호출과 동시에 값을 받음
Print "1부터 "; b; "까지의 합은 "; hap; "이다."
End Sub

그리고 한가지만 더 물어보겠습니다. 델파이에서 원그리는거는 어떻게 하는건지....이것도 부탁드립니다.ㅠ.ㅠ 그럼 고수님들 좋은하루되시구요 행복하세요
2  COMMENTS
  • Profile
    그냥 2003.04.08 12:46
    간단한 소스 같은데..

    델파이 문법을 조금만 공부하면 될거 같군요.

    그리고 원그리는 방법은..

    TCanvas 라는 클래스가 있습니다.
    캔바스 안에 원이라든가 사각형, 둥근사각형 등을 그릴수
    있는 프로시져(함수)가 있습니다.
  • Profile
    남궁두삼 2003.04.09 05:33
    네 답변 정말정말 감사합니다^^
    근데 canvas를 이용한 예제를 들어주시면 제가 공부하는데 더많이 도움이 될꺼같아서 이렇게 고수님한테 부탁드릴려고 글썼습니다^^
    간단한 예제로 canvas를 이용해 원을 움직이다든지 이런 예제같은거 들어주시면 제가 공부하는데 정말 많이많이 도움이 될것같습니다
    그럼 좋은 하루 되시구요 행복하세요