Vou ser bem prático pq tb já estou de saco cheio desse assunto e vou dar a
minha interpretação do assunto.
Desde que seja um componente que vc possua os fontes não vejo problema algum em
instalar no Turbo Explorer e ainda mais, vc não estará cometendo pirataria.
Tudo pelo simples fato que vc pode comprovar a propriedade intelectual do
componente. E como ficaria um professor que queira abordar o desenvolvimento de
componentes usando o Turbo Explorer? Não pode ensinar aos seus alunos? Se
ensinar os alunos estarão incorrendo em pirataria? Não e não.
A mesma lógica pode ser aplicada a componentes freeware com os fontes. Se vc
possui os fontes (.PAS) do componente e por acaso se trate de componente visual
acredito que seja perfeitamente possível inserir ao TE sem problemas.
Mas esta é a minha interpretação dos fatos. Mas como não tenho nenhuma ligação
com a Borland ou qualquer Solition Provider deles acho que a interpretação pode
ser diferente.
Saudações,
Ricardo.
Elazar Dornelles Ceza <[EMAIL PROTECTED]> escreveu: Boa Tarde;
Engraçado, já li uma porrada de coisa e ainda não consegui entender se o
que eu quero fazer no Turbo Delphi é contra segundo as licencas de uso.
Sera que alguem tem a responsabilidade de dizer apenas um SIM ou NÃO ao
inves de mandar trocentos links que falam a mesma coisa? Pois já li
todos e por mais que eu tente entender não to conseguindo. Portanto
formulei um exemplo bem pratico.
Tenho um componente (que eu criei) mas que poderia ser perfeitamente um
componente de terceiros, esta listado no final deste email, ele instala
e aparece na IDE do delphi 7 (testei), o criei apenas para tentar
exemplificar o que estou querendo entender.
Beleza, entao eu vou la no Turbo Delphi Explorer,
File New, VCL Forms Application
E monto o programa como segue as listagens do .pas e .dfm (a seguir),
rodo a aplicacao e la esta um componente descendente do TEdit, com
apenas um metodo bobo que inventei pra colocar o nome do componente no
Tlabel.
O Que eu quero saber, se isto que fiz com o TMyEdit é Contra a licenca
do Turbo Delphi Explorer?
Tendo em vista que eu não instalei o componente na IDE (nem tem como).
Apenas adicionei o nome da unit no Uses e criei uma instancia do
componente (o que PODE SER FEITO COM QUALQUER OUTRO).
Obrigado a todos que tiveram paciencia.
Atenc.
Elazar
{ PAS **************************************************************}
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls,
Forms,
Dialogs, ComCtrls, StdCtrls,
{Adicionado Manualmente}
uComponent;
type
TForm1 = class(TForm)
Label1: TLabel;
StatusBar1: TStatusBar;
procedure FormCreate(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
private
{ Private declarations }
public
{ Public declarations }
{ Criado uma variavel para instanciar o objeto }
vEdit : TMyEdit;
{ Evento para a modificacao do texto do componente }
procedure MyEditChange( Sender : TObject);
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
vEdit.Free;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
{ Cria o componente e ajusta as suas propriedades }
vEdit := TMyEdit.Create( Self);
vEdit.Parent := Self;
vEdit.Top := 10;
vEdit.Left := 100;
vEdit.Name := 'edtMyComponent';
{ Ajusta o evento para quando o texto do edit for
alterado (evento OnChange) e ajusta o LabelControl
que nada mais é do que uma rotina que copia o nome
do edit para o label associado. }
vEdit.OnChange := MyEditChange;
vEdit.LabelControl := Label1;
end;
procedure TForm1.MyEditChange(Sender: TObject);
begin
{ Ajusta o texto do edit ao status }
StatusBar1.SimpleText := vEdit.Text;
end;
end.
{ DFM **********************************************************}
object Form1: TForm1
Left = 0
Top = 0
Caption = 'Form1'
ClientHeight = 243
ClientWidth = 383
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
OldCreateOrder = False
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 24
Top = 16
Width = 31
Height = 13
Caption = 'Label1'
end
object StatusBar1: TStatusBar
Left = 0
Top = 224
Width = 383
Height = 19
Panels = <>
ExplicitLeft = 216
ExplicitWidth = 0
end
end
{********************* MY EDIT Componente **********************}
unit uComponent;
interface
Uses
Windows, Classes, StdCtrls;
type
TMyEdit = class(TEdit)
private
FLabel : TLabel;
procedure SetLabel(const Value: TLabel);
public
published
property LabelControl : TLabel read FLabel write SetLabel;
end;
procedure Register;
implementation
procedure Register;
begin
RegisterComponents('Teste', [TMyEdit]);
end;
{ TMyEdit }
procedure TMyEdit.SetLabel(const Value: TLabel);
begin
FLabel := Value;
if FLabel <> nil then
FLabel.Caption := Copy( TEdit(Self).Name, 4,
Length(TEdit(Self).Name));
end;
end.
-----Mensagem original-----
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Em nome de Mario Lucio
Enviada em: terça-feira, 26 de setembro de 2006 11:31
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: RES: [delphi-br] Usar componente de terceiros Turbo Delphi
VEJA O link. FALA TUDO
http://info.borland.com.br/Delphi2006/Portuguese_TurboFAQ.pdf
Mario Lucio
Analista / Desenvolvimento
VS SOFT INFORMATICA
Ser Cristão, não é só ser batizado: é seguir a Cristo e os Seus
ensinamentos.
----- Original Message -----
From: Claudir Pereira dos Santos
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, September 26, 2006 10:34 AM
Subject: Re: RES: [delphi-br] Usar componente de terceiros Turbo
Delphi
Sou novo aqui, mas pelo que vejo, se você cria um componete via
código não seria mesmo que a programação que a gente faz? Eu não
tenho esperiencia em criar componentes mas suponho que seja
semelhante, não é. Ha alguma diferença?
Cordialmente;
Claudir P. Santos
T.I.
--- Em delphi-br@yahoogrupos.com.br, "Elazar Dornelles Ceza"
<[EMAIL PROTECTED]> escreveu
>
> André;
>
> Isso mesmo não precisa instalar o componente na ide, basta por a
unit no
> uses....ai é so instanciar o objeto, se o programador for
organizado da
> pra trabalhar bem.
>
> Agora que da pra usar isso dah sim (da mais trabalho tb...rs...), so
> concordo que não sei se é LEGAL...
>
> Eu já fiz varios testes em casa, tenho componentes meus, que eu
criei
> para uso proprio, que funcionam desde o delphi 5 (RunTime)...e
> funionaram belezinha no Turbo. São componentes que eu uso assim
mesmo,
> sem instalar na IDE (sou meio contra o uso de componentes de outras
> pessoas).
>
> Tb fiz um outro teste tentando criar uma instancia dos TIBDataBase,
> TIBTransaction, TIBDataSet da antiga IBX...e olha...que tb me
surpreendi
> com o resultado, fiz um pequeno cadastrinho em menos de 10
> minutos....(quase so na mão)
>
> Se tivesse mais tempo...rs..e algumas classes pra um gerador de
> relatorios, as ideias são grandes!!!
>
> Agora ao fato de fazer alguma 'ganbiarra', eu discordo de voce, se
> referesse ao fato de simplesmente criar tudo em tempo de execucao,
pois
> ai eu acho que cada um tem a sua opiniao, e como já falei, prefiro
> trabalhar (ou ver alguem) com um pouco mais de codigo (bem
codificado),
> do que um sistema de cadastro basico com trocentos componentes
atirados
> num form.
>
>
> ANDREANO se tai ai meu filho, quer dizer pra nós se fazendo isso é
> algo ilegal????
>
> Digo se eu tenho um componente, que não vem junto com o delphi, eu
> posso usar ele nas minhas aplicações comerciais, apenas
instanciando o
> mesmo em run time?
>
> Isto vai contra a politica do Turbo Delphi?
>
> (não quero ser expulso ou suspenso por estimular pirataria aqui,
é so
> curiosidade mesmo)
>
>
> Tomei liberdade e mudei o titulo da thread.
>
>
> Atenc;
> Elazar
>
>
> -----Mensagem original-----
> De: delphi-br@yahoogrupos.com.br [mailto:delphi-
[EMAIL PROTECTED]
> Em nome de André - Gmail
> Enviada em: segunda-feira, 25 de setembro de 2006 14:52
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] crack para o delphi 7 enterprise
>
>
> Vc não consegue instalar pela IDE dele, como é feito no TurboDelphi
> Professional, vc pode criar o componente em tempo de execução, ou
fazer
> alguma gambiarra.
>
> ----- Original Message -----
> From: "Elazar Dornelles Ceza" <[EMAIL PROTECTED]>
> To: <delphi-br@yahoogrupos.com.br>
> Sent: Monday, September 25, 2006 10:44 AM
> Subject: RES: [delphi-br] crack para o delphi 7 enterprise
>
>
> Jdorea;
>
> Pera ai;
>
> Quem disse que não da pra utilizar componentes de terceiros????
>
>
> Atenc.
> Elazar
>
> -----Mensagem original-----
> De: delphi-br@yahoogrupos.com.br [mailto:delphi-
[EMAIL PROTECTED]
> Em nome de JDorea
> Enviada em: segunda-feira, 25 de setembro de 2006 09:45
> Para: delphi-br@yahoogrupos.com.br
> Assunto: Re: [delphi-br] crack para o delphi 7 enterprise
>
>
> Caro Julio,
>
> Acho que não há mais necessidade disto. A Borland está cobrando
> aproximadamente R$ 1200,00 pelo TurboDelphi Professional
completinho.
>
> Ou vc pode utilizar o TurboDelphi Explorer Gratuitamente, apenas
com a
> limitação de não poder utilizar componentes de terceiros.
>
> Se for para aprender, utilize o free depois quando for produzir,
invista
> no Pro.
>
> Boa Sorte
>
>
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
_______________________________________________________
Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular.
Registre seu aparelho agora!
http://br.mobile.yahoo.com/mailalertas/
---------------------------------
Yahoo! Search
Música para ver e ouvir: You're Beautiful, do James Blunt
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
