登录
首页 » Delphi » TakePhoto

TakePhoto

于 2021-02-19 发布 文件大小:8404KB
0 484
下载积分: 1 下载次数: 5

代码说明:

  Take photo in android delphi app

文件列表:

TakePhoto
.........\Android
.........\.......\Debug
.........\.......\.....\AndroidManifest.xml,2371,2016-11-26
.........\.......\.....\TakePhoto
.........\.......\.....\.........\AndroidManifest.xml,2371,2016-11-26
.........\.......\.....\.........\assets
.........\.......\.....\.........\bin
.........\.......\.....\.........\...\TakePhoto.apk,8313769,2016-11-26
.........\.......\.....\.........\classes
.........\.......\.....\.........\.......\classes.dex,1338868,2016-11-26
.........\.......\.....\.........\debug
.........\.......\.....\.........\library
.........\.......\.....\.........\.......\lib
.........\.......\.....\.........\.......\...\armeabi
.........\.......\.....\.........\.......\...\.......\gdbserver,268812,2016-11-26
.........\.......\.....\.........\res
.........\.......\.....\.........\...\drawable-hdpi

.........\.......\.....\.........\...\drawable-ldpi
.........\.......\.....\.........\...\.............\ic_launcher.png
.........\.......\.....\.........\...\drawable-mdpi

.........\.......\.....\.........\...\drawable-xhdpi

.........\.......\.....\.........\...\drawable-xxhdpi

.........\.......\.....\TakePhoto.vsr,101,2016-11-26
.........\AndroidManifest.template.xml,1664,2016-11-26
.........\FormularioConfiguracion.fmx,727,2016-11-26
.........\FormularioConfiguracion.pas,594,2016-11-26
.........\FormularioPrincipal.fmx,3494,2016-11-26
.........\FormularioPrincipal.pas,3179,2016-11-26
.........\TakePhoto.deployproj,3774,2016-11-26
.........\TakePhoto.dpr,434,2016-11-26
.........\TakePhoto.dproj,29056,2016-11-26
.........\TakePhoto.dproj.local,2088,2016-11-26
.........\TakePhoto.identcache,392,2016-11-26
.........\TakePhoto.res,756,2016-11-26
.........\TakePhoto.stat,162,2016-11-26
.........\Unit1.fmx,3136,2016-11-26
.........\Unit1.pas,2921,2016-11-26
.........\Unit2.pas,3629,2016-11-26
.........\Win32
.........\.....\Debug

下载说明:请别用迅雷下载,失败请重下,重下不扣分!

发表评论

0 个回复

  • draw
    此源码是一个可以在android手机上实现以动画的形式画图的一个demo(This source is a form of animation drawing a demo on the android phone)
    2013-05-17 11:13:10下载
    积分:1
  • 七自由度汽车模型程序
    七自由度汽车模型程序
    2021-05-06下载
    积分:1
  • MAU4-40,-55,-70图谱
    螺旋桨图谱设计,MAU4-40,-55,-70图谱
    2019-06-11下载
    积分:1
  • android 微信分享到朋友圈/ 微信分享 实例源码下载(可用)
    微信分享流程:1.申请你的AppID,申请地址:https://open.weixin.qq.com2.下载微信终端开发工具包3.搭建开发环境4.实例中需要用到申请到的AppID,等审核通过之后 测试就正常了, 很多人 activity 忘记 implements IWXAPIEventHandler 这是常犯的错误
    2014-05-22下载
    积分:1
  • android 开发mp4 浏览 播放 例子源码
    [实例简介]开发mp4 [实例截图] [核心代码]package com.example.mp4;import java.io.File;import java.util.Vector;import android.app.Activity;import android.content.Intent;import android.os.Bundle;import android.view.KeyEvent;import android.view.View;import android.view.View.OnClickListener;import android.view.ViewGroup;import android.widget.AdapterView;import android.widget.AdapterView.OnItemClickListener;import android.widget.BaseAdapter;import android.widget.Button;import android.widget.EditText;import android.widget.ImageView;import android.widget.ListView;import android.widget.TextView;import android.widget.Toast;public class MyFileActivity extends Activity { private final String[] FILE_MapTable = { ".3gp", ".mov", ".avi", ".rmvb", ".wmv", ".mp3", ".mp4" }; private Vector items = null;// 存放显示的名称 private Vector paths = null;// 存放文件路径 private Vector sizes = null;// 存放文件大小 private String rootPath = "/mnt/sdcard";// 起始文件夹 private EditText pathEditText;// 路径 private Button queryButton;// 查询按钮 private ListView fileListView;// 文件列表 @Override protected void onCreate(Bundle icicle) { // TODO Auto-generated method stub super.onCreate(icicle); setContentView(R.layout.myfile); this.setTitle("多媒体文件浏览"); pathEditText = (EditText) findViewById(R.id.path_edit); queryButton = (Button) findViewById(R.id.qry_button); fileListView = (ListView) findViewById(R.id.file_listview); // 单击按钮事件 queryButton.setOnClickListener(new OnClickListener() { @Override public void onClick(View v) { // TODO Auto-generated method stub File file = new File(pathEditText.getText().toString()); if (file.exists()) { if (file.isFile()) { // 如果是媒体文件直接打开 openFile(pathEditText.getText().toString()); } else { // 打开目录下的文件 getFileDir(pathEditText.getText().toString()); } } else { Toast.makeText(MyFileActivity.this, "找不到位置,请确定位置是否正确!", Toast.LENGTH_SHORT).show(); } } }); //设置listitem中的文件被单击时要做的动作 fileListView.setOnItemClickListener(new OnItemClickListener() { @Override public void onItemClick(AdapterView arg0, View arg1, int position, long arg3) { // TODO Auto-generated method stub fileOrDir(paths.get(position)); } }); //打开默认文件夹 getFileDir(rootPath); } //重写返回键功能是否为back public boolean onKeyDown(int keyCode,KeyEvent event){ //判断触发键是否为back键 if(keyCode == KeyEvent.KEYCODE_BACK){ pathEditText = (EditText)findViewById(R.id.path_edit); File file = new File(pathEditText.getText().toString()); if(rootPath.equals(pathEditText.getText().toString().trim())){ return super.onKeyDown(keyCode, event); }else{ getFileDir(file.getParent()); return true; } }else{ return super.onKeyDown(keyCode, event); } } //处理文件或目录的方法 private void fileOrDir(String path){ File file = new File(path); if(file.isDirectory()){ getFileDir(file.getPath()); }else{ openFile(path); } }//获取文件结构的方法 private void getFileDir(String filePath) { // TODO Auto-generated method stub pathEditText.setText(filePath); items = new Vector(); paths = new Vector(); sizes = new Vector(); File f = new File(filePath); File[] files = f.listFiles(); if (files != null) { /* 将所有文件添加到ArrayList中 */ for (int i = 0; i < files.length; i ) { if (files[i].isDirectory()) { items.add(files[i].getName()); paths.add(files[i].getPath()); sizes.add(""); } } for (int i = 0; i < files.length; i ) { if (files[i].isFile()) { String fileName = files[i].getName(); int index = fileName.lastIndexOf("."); if (index > 0) { String endName = fileName.substring(index, fileName.length()).toLowerCase(); String type = null; for(int x=0;i< FILE_MapTable.length;x ){ //符合预先定义的多媒体格式的文件才会在界面中显示 if(endName.equals(FILE_MapTable[x])){ type = FILE_MapTable[x]; break; } } if(type !=null){ items.add(files[i].getName()); paths.add(files[i].getPath()); sizes.add(files[i].length() ""); } } } } } fileListView.setAdapter(new FileListAdapter(this,items)); } private void openFile(String path) { // TODO Auto-generated method stub Intent intent = new Intent(MyFileActivity.this,MediaPlayerActivity.class); intent.putExtra("path", path); startActivity(intent); finish(); } //列表适配器 class FileListAdapter extends BaseAdapter{ private Vector items =null;//存放显示的名称 private MyFileActivity myFile; public FileListAdapter(MyFileActivity myFile,Vector items){ this.items = items; this.myFile = myFile; } @Override public int getCount() { // TODO Auto-generated method stub return items.size(); } @Override public Object getItem(int position) { // TODO Auto-generated method stub return items.elementAt(position); } @Override public long getItemId(int position) { // TODO Auto-generated method stub return items.size(); } @Override public View getView(int position, View convertView, ViewGroup parent) { // TODO Auto-generated method stub if(convertView==null){ //加载列表布局文件 convertView = myFile.getLayoutInflater().inflate(R.layout.file_item, null); } //文件名称 TextView name = (TextView)convertView.findViewById(R.id.name); //媒体文件类型 ImageView music = (ImageView)convertView.findViewById(R.id.music); //文件夹类型 ImageView folder = (ImageView)convertView.findViewById(R.id.folder); name.setText(items.elementAt(position)); if(sizes.elementAt(position).equals("")){ //隐藏媒体文件图标,显示文件夹图标 music.setVisibility(View.GONE); folder.setVisibility(View.VISIBLE); }else{ music.setVisibility(View.VISIBLE); folder.setVisibility(View.GONE); } return convertView; } }}
    2015-04-10下载
    积分:1
  • AndroidGesturePassword
    安卓手机的手势密码源码,用户可以设置九宫格密码并校验。(gesture password on android)
    2013-12-14 20:35:19下载
    积分:1
  • wpf 界面设计
    仿迅雷UI界面
    2014-09-15下载
    积分:1
  • TilePuzzle_Android
    拼图游戏代码,java实现,可参考,仅供学习(Jigsaw code, java implementation, reference, only to learn)
    2013-09-24 16:33:20下载
    积分:1
  • watchdog
    三星单片机资料比较少本程序实现S3F84U8看门狗-使能并喂狗(Samsung SCM relatively little information this program S3F84U8 Watchdog- enabled and feed the dog)
    2013-07-29 20:44:43下载
    积分:1
  • C++数据结构实现(入门级)
    c 顺序表、链表、静态链表、队列、一元多项式、汉诺塔、火车调度问题、操作系统调度问题、背包问题、最大连续子列和问题、KMP算法、稀疏矩阵、广义表、并查集、无向图邻接表、有向图邻接表、Krusskal算法、Prim算法、最短路径Di…Data-Structure
    2019-06-08下载
    积分:1
  • 696516资源总数
  • 106914会员总数
  • 0今日下载