Olá a todos do grupo. Estou com um grande problema. E está meio
complicado pra eu resolver. Gostaria de saber se há alguém aqui que
possa estar me dando uma mão. Preciso converter um código em java de
uma Fila de Propriedades para o delphi. Mas não estou conseguindo. O
código é esse logo abaixo:
/***
*** Classe que implementa um fila de prioridades simples
*** Fundão da Computação © 2002
*** e-Mail: [EMAIL PROTECTED]
***/
class IntPriorityQueue
{
private int[] queue;
private int size;
private int elements;
public IntPriorityQueue( int TAM )
{
queue = new int[TAM];
size = TAM;
elements = 0;
for ( int j = 0; j < TAM; j++ )
queue[j] = -1;
}
// Insere um valor na fila
public void Insert( int value ) {
if ( value > -1 && elements < size )
queue[ elements++ ] = value;
}
// Remove o maior valor da fila
public int Remove() {
int j, aux, max = 0;
if ( elements > 0 ) {
for ( j = 1; j < elements; j++ )
if ( queue[max] < queue[j] )
max = j;
// Troca
aux = queue[max];
queue[max] = queue[elements-1];
queue[elements-1] = aux;
return queue[--elements];
}
return -1;
}
// Imprime os elementos da fila
public void Print()
{
for( int i=0; i<elements; i++ )
System.out.println(queue[i]);
}
}
/* Exemplo de utilização da classe */
/*
public class sample {
public static void main(String[] args) {
int TAM = args.length > 0 ? args.length : 10;
Heap pq;
pq = new Heap(TAM);
pq.Insert(45);
pq.Insert(65);
pq.Insert(15);
pq.Insert(2);
pq.Insert(100);
pq.Insert(30);
pq.Print();
}
}
*/
Se eu alguém puder me ajudar, eu agradeceria muito.
Obrigado
