Q&A
- bubble sort?
정말 왕초보인데요...
델파이로 bubble sort를 책을 따라서
유닛파일에다가 한번
코디을 해봤는데 그 이후로는 어찌해야할지
몰겠네요...
제발 좀 갈쳐주세요....이책 저책 다뒤져도 파스칼 언어라는걸
첨해서....도저히 잘몰겠네요...잉....
========소스.....====================================
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure bubblesort (n : integer)
var
r : records;
i,k : integer;
flag : boolean;
begin
flag := true
k := n
while flag do
begin flag := false;
for i := to k-1 do
begin
if list[i].key > list[i+1].key then
begin
r := list[i]
list[i] := list[i+1];
list[i+1] := r;
flag := true
end;
end;
end;
end.
이거 비베처럼 이벤트를 주고 출력도 어디에 출력하는지
지정이 안된것 같은데...
하지만 도저히 어찌하지를 못하겠어요...
please~~~~~~~~~~~~~~~~~~~~~~~~~~~~~`
델파이로 bubble sort를 책을 따라서
유닛파일에다가 한번
코디을 해봤는데 그 이후로는 어찌해야할지
몰겠네요...
제발 좀 갈쳐주세요....이책 저책 다뒤져도 파스칼 언어라는걸
첨해서....도저히 잘몰겠네요...잉....
========소스.....====================================
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure bubblesort (n : integer)
var
r : records;
i,k : integer;
flag : boolean;
begin
flag := true
k := n
while flag do
begin flag := false;
for i := to k-1 do
begin
if list[i].key > list[i+1].key then
begin
r := list[i]
list[i] := list[i+1];
list[i+1] := r;
flag := true
end;
end;
end;
end.
이거 비베처럼 이벤트를 주고 출력도 어디에 출력하는지
지정이 안된것 같은데...
하지만 도저히 어찌하지를 못하겠어요...
please~~~~~~~~~~~~~~~~~~~~~~~~~~~~~`
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- coolling
- 2000.09.19 03:28
- 0 COMMENTS
- /
- 0 LIKES
-
- ljb007
- 2000.09.19 03:15
- 0 COMMENTS
- /
- 0 LIKES
-
- Nanhee
- •
- 2000.09.19 03:07
- 3 COMMENTS
- /
- 0 LIKES
-
돌머리•2000.09.19 04:10Nanhee wrote: > 반갑습니다. ^^ > > QReport에서 Detail밴드를 사용하여 데이타를 출력할려고 합니다...
-
최영근•2000.09.19 03:33Nanhee wrote: > 반갑습니다. ^^ > > QReport에서 Detail밴드를 사용하여 데이타를 출력할려고 합니다...
-
Nanhee•2000.09.19 18:42거의 하루종일을 고민하고 여기저기를 뒤졌었는데.... 고수님들의 말씀처럼 QuickRep의 Dataset이 연결...
-
- 심은진
- •
- 2000.09.19 03:04
- 1 COMMENTS
- /
- 0 LIKES
-
돌머리•2000.09.19 07:13심은진 wrote: > 폴더나 드라이브 공유시키는 방법좀 알려주세요 > 게시판을 뒤적여 봐도 제가 이해할수 ...
-
- 심은진
- •
- 2000.09.19 02:53
- 6 COMMENTS
- /
- 0 LIKES
-
타락천사•2000.09.20 01:08
-
임형호•2000.09.19 03:55
-
심은진•2000.09.19 19:21
-
김하늘•2000.09.19 23:27
-
심은진•2000.09.20 01:02
-
김상호•2000.09.20 03:02
-
- 노바녹스
- •
- 2000.09.19 02:37
- 2 COMMENTS
- /
- 0 LIKES
-
돌머리•2000.09.19 04:38노바녹스 wrote: > 안녕하셔요... > 델 왕초보입니다... > 퀵리포트를 이용해서 출력을 하고 있는데 문...
-
김종운•2001.01.06 19:25아래 내용대로 했는데 첫번째 페이지가 항상 두그룹 인쇄후 두번째 페이지부터 정상으로 찍히는데 왜 그...
-
- 삥
- •
- 2000.09.19 02:30
- 1 COMMENTS
- /
- 0 LIKES
-
최용일•2000.09.19 04:37안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다. var Item: TListIte...
-
- hihybu
- •
- 2000.09.19 02:23
- 1 COMMENTS
- /
- 0 LIKES
-
최재영•2000.10.20 20:02hihybu wrote: > 김용일님 팁에서 폼인쇄하는 팁으로 출력을 했더니 백지만 출력이 되더군요 > > 프린...
-
- heimdal
- •
- 2000.09.19 02:03
- 3 COMMENTS
- /
- 0 LIKES
-
돌머리•2000.09.19 02:58heimdal wrote: > 안녕하세여..헤임달입니다.. > > var > start, stop, temp : Tdatetime; > begi...
-
heimdal•2000.09.19 21:23> 당연히 Start_Time필드를 찾을 수 없을것입니다. > Query의 Select문에 보면 "sql.Add('select Machi...
-
666•2000.09.19 02:31필요한 필드를 select 를 아니 하신건 아닌지.. 'select Machine_name from "machine_main.db" 위...
-
- 레오..^^
- •
- 2000.09.19 02:01
- 1 COMMENTS
- /
- 0 LIKES
정말 왕초보인데요... 델파이로 bubble sort를 책을 따라서 유닛파일에다가 한번 코디을 해봤는데 그 이후로는 어찌해야할지 몰겠네요... 제발 좀 갈쳐주세요....이책 저책 다뒤져도 파스칼 언어라는걸 첨해서....도저히 잘몰겠네요...잉....-
666•2000.09.19 02:35델파이 설치된 곳에 보시면 소트에 관한 예제가 있습니다.. C:Program FilesBorlandDelphi4Demo...
-
- 민
- •
- 2000.09.19 01:52
- 1 COMMENTS
- /
- 0 LIKES
-
돌머리•2000.09.19 06:00민 wrote: > 드라이브에 관계없이 확장자가 'DOC'이거나 'HLP'인 파일을 찾아서 > > 그 확장자를 'TXT...
-
- mickblue
- •
- 2000.09.19 02:02
- 1 COMMENTS
- /
- 0 LIKES
-
돌머리•2000.09.19 04:44mickblue wrote: > 회사에 입사한지 3일정도 지났는데 델파이로 시스템을 돌리는데... > 전 델파이가 첨...
-
-
돌머리•2000.09.19 02:30hnc wrote: > > 퀵레포트 출력시 디테일 5개출력후 공백을 한칸줄수 있는방법은 없나여 > 몇가지 방...
-
-
- coolling
- •
- 2000.09.19 01:47
- 1 COMMENTS
- /
- 0 LIKES
-
최석기•2000.09.19 18:57coolling wrote: > query의 update문을 사용해서 table에 있는 data를 수정했습니다. > 그러면, 다음과 ...
-
- 돌머리
- 2000.09.19 01:29
- 0 COMMENTS
- /
- 0 LIKES
-
- 윤미영
- •
- 2000.09.19 01:25
- 1 COMMENTS
- /
- 0 LIKES
-
돌머리•2000.09.19 05:16윤미영 wrote: > 제가 panel1, panel2, panel3,... panel25를 차례대로 보이게 하고 싶습니다. > 그래서 ...
-
- 김형하
- 2000.09.19 01:09
- 0 COMMENTS
- /
- 0 LIKES
-
- 델병아리
- 2000.09.19 00:57
- 0 COMMENTS
- /
- 0 LIKES
-
- heimdal
- •
- 2000.09.19 00:45
- 2 COMMENTS
- /
- 0 LIKES
-
허춘•2000.09.19 07:36heimdal wrote: > with query1 do > begin > close; > sql.Clear; > ...
-
heimdal•2000.09.19 21:28허춘 wrote: > heimdal wrote: > > with query1 do > > begin > > close; > > ...
-
- 꼴통
- •
- 2000.09.19 00:44
- 4 COMMENTS
- /
- 0 LIKES
-
최용일•2000.09.19 00:47안녕하세요. 델파이세상(http://www.freechal.com/delphiworld)의 최용일입니다. StringReplace함수는 S...
-
꼴통•2000.09.19 01:43SysUtils유닛이 추가되어 있는데도 계속 똑같은 에러가 나네여...... 왜이러져?(ㅠ.ㅠ) 최용일 wrote: ...
-
최용일•2000.09.19 01:48그럴리가 없는데요. 제가 컴파일해봤는데 이상없이 동작합니다. 혹시 델파이 버전이 어떻게 되나요? 버...
-
꼴통•2000.09.19 02:52그런 휼륭한 방법이 감탄입니다. 저희쪽에서 개발된게 델3이거든여 그래서 한 2시간정도는 헤멘것같습니...
델파이 설치된 곳에 보시면 소트에 관한 예제가 있습니다..
C:Program FilesBorlandDelphi4DemosThreads
한번 참고해 보시면..
행복하세요..
레오..^^ wrote:
> 정말 왕초보인데요...
> 델파이로 bubble sort를 책을 따라서
> 유닛파일에다가 한번
> 코디을 해봤는데 그 이후로는 어찌해야할지
> 몰겠네요...
> 제발 좀 갈쳐주세요....이책 저책 다뒤져도 파스칼 언어라는걸
> 첨해서....도저히 잘몰겠네요...잉....
>
> ========소스.....====================================
> unit Unit1;
>
> interface
>
> uses
> Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
>
> type
> TForm1 = class(TForm)
> private
> { Private declarations }
> public
> { Public declarations }
> end;
>
> var
> Form1: TForm1;
>
> implementation
>
> {$R *.DFM}
> procedure bubblesort (n : integer)
> var
> r : records;
> i,k : integer;
> flag : boolean;
> begin
> flag := true
> k := n
> while flag do
> begin flag := false;
> for i := to k-1 do
> begin
> if list[i].key > list[i+1].key then
> begin
> r := list[i]
> list[i] := list[i+1];
> list[i+1] := r;
> flag := true
> end;
> end;
> end;
>
>
> end.
>
> 이거 비베처럼 이벤트를 주고 출력도 어디에 출력하는지
> 지정이 안된것 같은데...
> 하지만 도저히 어찌하지를 못하겠어요...
> please~~~~~~~~~~~~~~~~~~~~~~~~~~~~~`
>